kleine abfrage

[raccoon]

und hab noch einen fehler jetzt..hier der code

Delphi-Quellcode:

var
  BackupName: string;
  FileHandle: TFileStream; // vorher 'Integer'
  StringLen: Integer;
  X: Integer;
  Y: Integer;
  begin
  if SaveDialog1.Execute then
  begin
    if FileExists(SaveDialog1.FileName) then
    begin
      BackupName := ExtractFileName(SaveDialog1.FileName);
      BackupName := ChangeFileExt(BackupName, '.BAK');
      if not RenameFile(SaveDialog1.FileName, BackupName) then

        raise Exception.Create('Unfähig eine Aushilfsdatei zu erschaffen.');
    end;
    FileHandle := FileCreate(SaveDialog1.FileName);
    FileWrite(FileHandle,
      Sg.ColCount, SizeOf(Sg.ColCount));
    FileWrite(FileHandle,
      Sg.RowCount, SizeOf(SG.RowCount));
    for X := 0 to SG.ColCount - 1 do
    begin

ich habe es mit beiden typen versucht er spuckt mir trotzdem immer den fehler aus entweder TFileStream und Filestream oder halt integer und filestream sind nicht kompatibel.