假設輸入了一些指令

var
sum:integer
i:integer
sum:=0;
for i:=1 to 100
sum:=sum i;

如果是VB
只要在最後一行
下
print sum
就可以將結果顯示出來了
請問delphi要如何快速的顯示呢
謝謝各位了



剛剛試出來了
我用
edit1.text:=inttostr(s);
或是
memo1.lines.add(inttostr(s));
不知道各位前輩們
有沒有更快的方法呢

編輯記錄

[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var
sum:integer;
i:integer;
begin
sum :=0;
for i:=1 to 100 do
sum := sum i;
Canvas.TextOut(10,10,inttostr(Sum));
end;
[/code]

------
努力會更接近成功

===================引 用 pceyes 文 章===================

[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var
sum:integer;
i:integer;
begin
sum :=0;
for i:=1 to 100 do
sum := sum i;
Canvas.TextOut(10,10,inttostr(Sum));
end;
[/code]

謝謝您
pceyes兄
再請問您幾個問題喔
1.如何在編輯程式時，旁邊顯示出行號(我知道列印時可以)
2.我用的是delphi 5 enterprise，我同事用tncnx的元件來進行telnet的動作
我一開始以為是因為沒有灌indy，後來灌了indy9.0.18_d5，發現元件是有變多啦
不過怎麼那個元件還是找不到呢?是indy太舊了嗎??

===================引 用 andyto202 文 章===================
謝謝您
pceyes兄
再請問您幾個問題喔
1.如何在編輯程式時，旁邊顯示出行號(我知道列印時可以)
2.我用的是delphi 5 enterprise，我同事用tncnx的元件來進行telnet的動作
我一開始以為是因為沒有灌indy，後來灌了indy9.0.18_d5，發現元件是有變多啦
不過怎麼那個元件還是找不到呢?是indy太舊了嗎??
１．我在D7找不到設定的地方，但D2009就直接有了，網查約在D2006才開始有此功能，個人從D1用到D2009，從沒想到要用行號，好奇問一下，行號有何用處?
Books : Mastering Borland Delphi 2005: Update for Delphi 2006
http://www.marcocantu.com/md2005/UpdateDelphi2006_ch01.html
２．TnCnx好像不是Indy元件喔，請看以下網址，並下載安裝：
Koders Code Search: TnCnx.pas - Delphi - ZLL
http://www.koders.com/delphi/fid8F4D32F5F224E427206C8326319D3939BB216E33.aspx?s=wsocket#L13

------
努力會更接近成功

編輯記錄

===================引 用 pceyes 文 章===================

===================引 用 andyto202 文 章===================
謝謝您
pceyes兄
再請問您幾個問題喔
1.如何在編輯程式時，旁邊顯示出行號(我知道列印時可以)
2.我用的是delphi 5 enterprise，我同事用tncnx的元件來進行telnet的動作
我一開始以為是因為沒有灌indy，後來灌了indy9.0.18_d5，發現元件是有變多啦
不過怎麼那個元件還是找不到呢?是indy太舊了嗎??
１．我在D7找不到設定的地方，但D2009就直接有了，網查約在D2006才開始有此功能，個人從D1用到D2009，從沒想到要用行號，好奇問一下，行號有何用處?
Books : Mastering Borland Delphi 2005: Update for Delphi 2006
http://www.marcocantu.com/md2005/UpdateDelphi2006_ch01.html
２．TnCnx好像不是Indy元件喔，請看以下網址，並下載安裝：
Koders Code Search: TnCnx.pas - Delphi - ZLL
http://www.koders.com/delphi/fid8F4D32F5F224E427206C8326319D3939BB216E33.aspx?s=wsocket#L13

再次感謝您
我是從component=>install componet進去安裝的
不過安裝時發生錯誤
[Fatal Error] TnCnx.pas(79): File not found: 'WSocket.dcu'
我後來自己試成功了

還是要感謝您的幫助

因為我同事寫的都是偏網路的程式
所以需要用到那個元件
明天我再問您一段程式碼的作用
辛苦您了

編輯記錄