Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#9

Re: Procedure nicht sichtbar...

  Alt 24. Feb 2006, 19:25
Warum instanzierst du im Konstruktor die eigene Klasse? Du brauchst eigentlich auch keinen eigenen Konstruktor:

Delphi-Quellcode:
unit ShutDown;

interface

uses
  Windows, Messages;

type
  TShutDown = class(TObject)
  private
    procedure GetPrivileges;
  public
    procedure Shutdown(PowerOff,Force :boolean);
    procedure Ruhezustand(Force :boolean);
    procedure Standby(Force :boolean);
    procedure Logoff(Force : boolean);
    procedure Restart(Force :boolean);
end;

var
  PowerOff: boolean;

implementation


procedure TShutDown.GetPrivileges; //Rechte um runterzufahren holen.
//...
Und wozu die globale Variable PowerOff?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat