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

引用其它button里定义的变量

答題得分者是:Zard
小丫123
初階會員


發表:85
回覆:62
積分:29
註冊:2004-08-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-12-18 08:54:22 IP:218.65.xxx.xxx 未訂閱
在全局变量中定义了变量 PicName,NewName:string; 在formatchangbtton 中  
PicName:=OpenDialog1.filename;
       newName:=changFileEXT(PicName,'.svg');
                  
在button2中我想参看刚才打开文件变化后的file的源代码,所以要用到NewName.应该怎么实现呢?
Zard
尊榮會員


發表:24
回覆:396
積分:539
註冊:2003-11-26

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-12-18 09:32:53 IP:61.64.xxx.xxx 未訂閱
引言: 在全局变量中定义了变量 PicName,NewName:string; 在formatchangbtton 中
PicName:=OpenDialog1.filename;
       newName:=changFileEXT(PicName,'.svg');
                  
在button2中我想参看刚才打开文件变化后的file的源代码,所以要用到NewName.应该怎么实现呢?
您的意思是說在經過處理後的一個.svg檔, 你想要查看它的內容, 是嗎?
procedure TForm1.Button2Click(Sender: TObject);
begin
  Memo1.Lines.Clear;
  // 把newName所指的檔案列印在Memo1
  Memo1.Lines.LoadFromFile(newName);
end;
系統時間:2024-05-21 19:47:22
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!