Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
5. Jan 2009
Das sehe ich auch so, dann kannst Du Dir die Klasse sparen (eine einzige Instanz würde ja eh nicht reichen).
for i := s.FixedRows to Pred(s.RowCount) do
WriteLn (F,Format('%s|%s|%s',,s.Cells,s.Cells]));
So in der Art.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
5. Jan 2009
Kannst Du mal einen Screenshot des Grids anhängen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
5. Jan 2009
Wo ist denn das AssignFile?
Außerdem ist Deine Einrückung etwas unübersichtlich.procedure TForm2.Button1Click(Sender: TObject);
begin
if opendialog1.execute then
begin
AssignFile(f,opendialog1.FileName); //diese Zeile hat gefehlt
If Not FileExists(opendialog1.FileName) Then Begin
ReWrite(f);
End Else Begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
5. Jan 2009
Eben, das CloseFile hat im Ursprungscode auch noch gefehlt.