全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1343
推到 Plurk!
推到 Facebook!

為何Windows.MessageBox躲在後面..

缺席
alvin26
初階會員


發表:24
回覆:41
積分:28
註冊:2005-04-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-10-12 01:13:08 IP:61.219.xxx.xxx 訂閱
請問各位大大,
為何 windows.MessageBox 若寫在 Application.MessageBox後面的話,
就會show在程式的後面,好像躲起來一樣的..
寫在Application.MessageBox前面就不會
下面是source code

[code delphi]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
private

{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation
var ThisHandle:Cardinal;
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
ThisHandle:=Application.Handle;
end;

initialization

finalization
ShowMessage('showmessage now running finalization');
Application.MessageBox('Application.MessageBox now running finalization',PChar('caption'),64);
Windows.MessageBox(ThisHandle,'Windows.MessageBox program is teminated','message',64);
end.
[/code]
------
弟子規,聖人訓,首孝悌,次謹信,泛愛眾,而親仁,有餘力,則學文。
系統時間:2024-05-04 8:20:56
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!