fehlermeldung - programm retten..!!!

[nahpets]

Poste bitte mal die USunTimes.pas oder hänge das ganze Projekt als ZIP an Deinen Beitrag an.

[ann]

ok leute, ich hab den fehler gefunden:

bei mir sah das irgendwo am anfang des quelltextes so aus:

Delphi-Quellcode:

...

  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

implementation

{$R *.dfm}


var
  Form1: TForm1;
  IdHTTP: TIdHTTP;
  ZeitAufgang_Std, ZeitAufgang_Min, ZeitUntergang_Std,
    ZeitUntergang_Min: Integer;
  Sprache: Boolean;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ...

weil ich dachte var ist var egal ob das jetzt vor implementation steht oder nicht und ich es deshalb zusammengepackt habe.

und jetzt läuft es wieder weil ich das wieder so gemacht hab:

Delphi-Quellcode:

...
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}


var
  IdHTTP: TIdHTTP;
  ZeitAufgang_Std, ZeitAufgang_Min, ZeitUntergang_Std,
    ZeitUntergang_Min: Integer;
  Sprache: Boolean;

procedure TForm1.FormCreate(Sender: TObject);
begin
...

[a.def]

Wo wir schoneinmal dabei sind: am besten keine globalen Variablen

Besser, aber auch nicht perfekt, so:

Delphi-Quellcode:

...
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    IdHTTP: TIdHTTP;
    ZeitAufgang_Std, ZeitAufgang_Min, ZeitUntergang_Std,
    ZeitUntergang_Min: Integer;
    Sprache: Boolean;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
...

Wenn du die Variablen NUR in dieser Unit brauchst, dann pack sie in private.

[p80286]

Zitat von a.def:

Wenn du die Variablen NUR in dieser Unit brauchst, dann pack sie in private.

Entschuldige, das ist nicht ganz richtig, dann ist die Variable bur innerhalb der Klasse verfügbar.

Gruß
K-H

[himitsu]

Zitat von p80286:

Zitat von a.def:

Wenn du die Variablen NUR in dieser Unit brauchst, dann pack sie in private.

Entschuldige, das ist nicht ganz richtig, dann ist die Variable bur innerhalb der Klasse verfügbar.

Gruß
K-H

jain,

private und protected ist historisch in der Klasse und auch in der Unit, wo die Klasse deklariert ist.

Darum gibt es inzwischen auch das strict private und strict protected .