Funktion aufrufen?

[Delphi Star]

Wie kann man diese Funktion aufrufen :?:

[gsh]

hi

des ist ganz einfach:

Code:

function GetPowerStatus(var HasBattery: Boolean; var LoadStatusString: String; 
  var LoadstatusPercent: Integer): DWORD; 
var 
  SystemPowerStatus: TSystemPowerStatus; 
  Text: string; 
resourcestring 
  rsLoadStatusUnknown = 'Unbekannter Status'; 
  rsLoadStatusNoBattery = 'Es existiert keine Batterie'; 
...
...
...

die function reinschreiben und dann:

Code:

prodecure Bitbtn.....
var
  A : DWord;
begin
  A := GetPowerStatus(und hier die Parameter): DWORD;
end;

Ps.: Du musst des ganzer nicht in die Variable stecken.

gsh

[Nicodius]

Delphi-Quellcode:

prodecure Form1.Button1Click(Sender : TObject);
var 
  A : DWord; 
begin 
  A := GetPowerStatus(Parameter); 
end;

[goodvirus]

Ich glaub eher er weiß nicht wo er die Parameter herbekommen soll (ich genauso) ;)

[Dax]

So:

Delphi-Quellcode:

var
  HasBattery: Boolean;
  Status: string;
  BatteryPercent: Integer;
  C: Cardinal;
begin
  C := GetPowerStatus(HasBattery, Status, BatteryPercent);
end;

[Nicodius]

naja ... var steht für etwas wo eine wert draufgegeben werden kann also ne variable und KEINE KONSTANTE