LGPL开源的 freepascal lazaurs 很象当年曾经辉煌的Dephi一样
虽然说用了Qt，Linux下快速开发已经没有多少可以选择了，不过最近下载打包了一些软件的源码既不是Qt写的，也不是GTK或wxGTK写的，真的象发现新大陆一样被早被遗忘多年的pascal兄弟给找出来了。同freepascal相伴的还有lazaurs这个IDE，操作起来和当年曾经Win编程辉煌一时的Dephi简直是一模一样。 找个object pascal语言的教程都有点困难了，读写文本的操作在网上居然搜了半天lazaurs 对中文支持较差，默认保存utf8码，保存过的GB码文件还是可以正常读出，最大的困扰是编辑器内不能打入中文却能复制进中文。。。MGC系统默认GB码，所以很可能终端输出乱码。
Var
textf:TextFile; //定义文件变量textf
F : Textfile;
str:String;
S:String;
i:Integer;
begin
AssignFile(textf,'./File.txt'); //将文件变量textf与当前目录中的“file．txt"文件关联
Rewrite(textf); //创建文件或打开已存在的文件进行覆盖
for i:=1 to 5 do
begin
S:='This is Line#';
writeln(textf,s,i);
end;
AssignFile(F,'./read.txt');
Reset(F);
Readln(F,str);
writeln('用窗口模式',str);
Closefile(F);
CloseFile(textf); //关闭已打开的文件textf
end.
[ 本帖最后由 haulm 于 2010-1-9 11:17 编辑 ] 目前还不是正式版……如果作为开发的话还是不太成熟……等正式版……还有就是控件还不够多……
页:
[1]