Moin !

Ich habe da diesen Typen:
type TLVDeviceID = ( ID_Test1, ID_Test2, ID_Test3 ); Diesen würde ich gerne in einer INI Datei sichern und auch wieder laden.
Geht das? Und wenn ja wie?

Hi,

ich würde das so machen:

markieren

Delphi-Quellcode:

var x: integer;
LVDeviceID: TLVDeviceID;

//schreiben
x := ord (LVDeviceID);
ini.WriteInteger ('foo', 'LVDeviceID', x);

//lesen
x := ini.ReadInteger ('foo', 'LVDeviceID', 1);
LVDeviceID := TLVDeviceID(x);

Hallo,

noch eine Alternative:

markieren

Delphi-Quellcode:

type
  TLVDeviceID = ( ID_Test1, ID_Test2, ID_Test3 );
var
  devId: TLVDeviceID;
begin
  devID := ID_Test2;
  ini.WriteString( 'settings', 'LVDeviceID',
    {TypInfo.}GetEnumName(TypeInfo(TLVDeviceID), Ord(devId))
  );
end;

Grüße vom marabu

Moin !

Ok, das wegschreiben geht super, aber wie kriege ich es retour?

markieren

Delphi-Quellcode:

  Temp := DeviceINI.ReadString( 'settings', 'LVDeviceID', '');
devID := GetEnumValue(TypeInfo(TLVDeviceID), Temp);

So gehts nicht. Dann sagt er Integer und TLVDeviceID sind Inkompatibele Typen. (Hat er sogar recht )

Ok ich habs schon ...

Temp ist Integer ...

markieren

Delphi-Quellcode:

Temp := GetEnumValue(TypeInfo(TLVDeviceID), DeviceINI.ReadString( 'settings', 'LVDeviceID', ''));
devID := TLVDeviceID(Temp);

Danke trotzdem für die Infos !