Var
F : Textfile; //申明變量
Begin
AssignFile(F,'c:\aaa.txt'); //讓變量F和C:\ek.txt關連
Writeln(F，'abcdefg'); //寫入文件
Closefile(F); //釋放變量F
End;
2、
var
x:integer;
begin
for x:=1 to 100 do
s:=s+x;
3、
if form1.visible=true then
form1.visible:=fals;
delphi 中循環和vb差不多。delphi中的for循環不能加步長 建議在學習delphi的時候如果用到循環用while delphi中的付值語句用 “:=” 判斷語句用 “=” 在壹個循環中如果有符合語句的時候要用begin 和end; 擴起來；begin 和end; 有點想c語言中的{} 在if 語句中else語句的前面不能加 ";"