Zitat von
Bent1995:
Hallo,
Ich habe mir anhand
dieses Threads ein Programm zusammengestellt welches einen Energiesparplan einstellt... Jedoch wollte ich nicht das der User diesen manuell aussuchen muss sondern dass ich einen vorgebe und der dann aktiviert wird... die original Procedure sieht so aus:
Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
var active_guid : TGUID;
begin
active_guid := StringToGuid(lb1.Items[getSel()]);
if(not setScheme(active_guid)) then
showmessage('Fehler');
end;
ich hab das daraus gemacht:
Delphi-Quellcode:
active_guid := {A181308-3541-4FAB-BC81-F71556F20B4A};
if(not setScheme(active_guid)) then
showmessage('Fehler');
Jedoch bekomme ich folgenden Fehler:
(Hiernach makiert er: {A181308-3541-4FAB-BC81-F71556F20B4A}
;)
[DCC Error] Unit1.pas(418): E2029 Expression expected but ';' found
Ich habe kein Plan warum...
könnt ihr mir weiterhelfen?
Nehm alles zurück hab die Lösung selber gefunden:
Erst mach ichn string draus, und wandel den dann in n
Guid um:
Delphi-Quellcode:
active_guid := StringToGuid ('{A1841308-3541-4FAB-BC81-F71556F20B4A}');
if(not setScheme(active_guid)) then
showmessage('Fehler');