3
我是delphi的初学者,我被卡住了最终确定错误e2155。我正在使用RAD 10并尝试在移动设备上运行我的程序。它可以在我的Windows机器上正常工作,但是当我更改为Android或IOS时,它会给我那个定稿错误。记录需要定稿 - 不允许在文件中
验证码:
type
TRaumparameter = record
ID : string;
Länge: string;
Breite: string;
Höhe: string;
Fläche: string;
Raumvolumen: string;
Wände: string;
Decke: string;
Boden: string;
Baujahr: string;
Heizlast: string;
end;
var Aufstellraum: Traumparameter;
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.fmx}
{$R *.iPad.fmx IOS}
procedure TForm1.speichernClick(Sender: TObject);
var F: File of Traumparameter;
begin
Aufstellraum.Länge:=form2.Länge.Text;
Aufstellraum.Breite:=form2.Breite.Text;
Aufstellraum.Höhe:=form2.Höhe.Text;
Aufstellraum.Fläche:=form2.Fläche.Text;
Aufstellraum.Raumvolumen:=form2.ErgebnisRaumVol.Text;
Aufstellraum.Wände:=form2.Wände.Text;
Aufstellraum.Decke:=form2.Decke.Text;
Aufstellraum.Baujahr:=form2.Baujahr.Selected.Text;
Aufstellraum.Heizlast:=form2.Heizlast.Text;
try
AssignFile(F,'D:\test\1.txt');
ReWrite(F);
Write(F,Aufstellraum);
finally
CloseFile(F);
end;
end;
我已经尝试过以限制[]字符串的长度,但随后它告诉我:“;”预计但'''发现。 希望我能得到一些答案,因为我花了一段时间安静没有任何成功。提前致谢!!
不应使用传统Pascal I/O。以JSON形式存储。 –
这里显示的代码在windows上不起作用,除非你使用'ShortString'而不是'String'。在移动平台上不支持在他的回答'ShortStrings'中由LU RD表示的总线。 – SilverWarior