Problem mit einer procedure (Action deklaration)

[AlexII]

Hallo,

ich habe folgende procedure geschrieben:

Delphi-Quellcode:

procedure TForm1.SaveMainSettings;
var Ini: TIniFile;
    UserAppDataDir: String;
    i: Integer;
    s1,s2,s3,s4: String;
    List: TStringList;
begin

  UserAppDataDir := GetSpecialFolder(CSIDL_LOCAL_APPDATA);
  ForceDirectories(UserAppDataDir + AppDataRootDir + AppDataProjectDir);
  Ini := TIniFile.Create(UserAppDataDir + AppDataRootDir + AppDataProjectDir + '\Config-t.ini');
 try
   Ini.WriteInteger('Default', 'Channel', ComboBox1.ItemIndex);
   Ini.WriteInteger('Default', 'Volume', TrackBar1.Position);
   ......
 finally
   Ini.Free;
 end;
Action:=caFree;                 <----- hier wird die Fehlermeldung ausgelöst. 

//ChannelList save
 List:=TStringList.Create;
 try
    for i:=0 to ListBox1.Count-1 do
    begin
    s1:=ListBox1.Items.Strings[i];
    s2:=ListBox2.Items.Strings[i];
    s3:=ListBox3.Items.Strings[i];
    s4:=ListBox4.Items.Strings[i];
    List.Add('=' + s1 + '=' + s2 + '=' + s3 + '=' + s4 + '=');
    end;
    List.SaveToFile(UserAppDataDir + AppDataRootDir + AppDataProjectDir + '\ChannelList.ccr');
 finally
    List.Free;
 end;
end;

aber irgendwie funktioniert sie nicht so richtig, bekomme folgende Fehlermeldung:

Zitat:

[Fehler] Unit1.pas(1150): Inkompatible Typen: 'TBasicAction' und 'TCloseAction'

Wer kann mir hier weiter helfen?

[mkinzler]

Was hast du den vor?

[Luckie]

Du bist nun schon so lange dabei und solltest wissen, was ein aussagekräftiger Titel ist. :?

Interessant wäre auch wohl die Deklaration von Action.

[AlexII]

Einstellungen speichern... Wenn man eine Einstellungen vorgenommen hat, rufe ich diese Funktion auf und speichere die jeweilige Einstellung.

[AlexII]

Zitat:

Zitat von Luckie

Du bist nun schon so lange dabei und solltest wissen, was ein aussagekräftiger Titel ist. :?

Hab überlegt wie ich den nennen soll, ehrlich.... konnte mir nix besseres ausdenken. :gruebel:

[AlexII]

Zitat:

Zitat von Luckie

Interessant wäre auch wohl die Deklaration von Action.

Von welchem Typ ist den die Variable Action? :gruebel:

[mkinzler]

Das solltest doch du wissen.

[AlexII]

Dann hätte ich nicht gefragt, oder? :roteyes:

[Matze]

Du nutzt die Variable doch, also musst du wissen, was du da machst bzw. zusammen kopierst (?).

Ist es vielleicht TForm.Action?

[AlexII]

Mir wurde gesagt halt, setze es da rein. Aber eigentlich kann ich doch die Action ganz löschen, oder? :gruebel: