能否让动态创建的image显示在窗体的指定位置 |
|
尚未結案
|
|
bolidehi
一般會員   發表：11 回覆：11 積分：4 註冊：2004-03-10 發送簡訊給我 |
procedure TMainForm.BitBtn1Click(Sender: TObject);
var
im:timage;
begin
im:=timage.Create(mainform);
im.Left:=200;
im.Top:=200;
im.Picture.LoadFromFile(extractfilepath(application.name) 'cus2.bmp');
im.Enabled:=true;
im.Visible:=true;
im.show;//我想让它在窗体的（200，200）处显示出来；
end；
但是，在窗体就根本不能显示出图形。
请问：怎么写？ 發表人 - taishyang 於 2004/04/12 13:56:17
|
|
Chance36
版主  發表：31 回覆：1033 積分：792 註冊：2002-12-31 發送簡訊給我 |
引言: procedure TMainForm.BitBtn1Click(Sender: TObject); var im:timage; begin im:=timage.Create(mainform); im.Left:=200; im.Top:=200; im.Picture.LoadFromFile(extractfilepath(application.name) 'cus2.bmp'); im.Enabled:=true; im.Visible:=true; im.show;//我想让它在窗体的（200，200）处显示出来； end； 但是，在窗体就根本不能显示出图形。 请问：怎么写？bolidehi 你好 你必須要設定如下紅色部份 procedure TMainForm.BitBtn1Click(Sender: TObject); var im:timage; begin im:=timage.Create(mainform); im.Left:=200; im.Top:=200; im.Picture.LoadFromFile(extractfilepath(application.name) 'cus2.bmp'); im.Enabled:=true; im.Visible:=true; im.Parent := Form1;// 或 im.Parent := Panel1;// //im.show;//我想让它在窗体的（200，200）处显示出来； end； |
發表時間：2004-04-12 13:54:34
IP:218.88.xxx.xxx 未訂閱
系統時間：2024-05-19 7:40:56
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |