Eigene Class, fehler: "might not been initialized"

[Sh4dd4r]

Ich programmiere noch nicht sehr lange mit Delphi, möchte jetzt aber mal ein halbwegs nützliches programm schreiben, soetwas wie einen gehirntrainer. dazu habe ich in einem *.txt dokument eine wörterliste mit einigen 1000 wörtern.

ich möchte nun 10/20/.../X zufällige Zeilen aus dieser Textdatei in ein Array speichern, zusätzlich soll dieses array aber noch abspeichern bis zur wievielten zeile es voll ist.

daher hab ich mal ne eigene class entworfen, die ein array beinhaltet und eine integer zahl abspeichern kann für die "füllhöhe" des arrays.

Delphi-Quellcode:

type
 wordlist = class
  private
   NumberOfWords: integer;
   word: array[1..100] of string;
end;

immer wenn ich aber eine variable vom typ dieser class verwende kommt das:

Zitat:

[Warning] Unit1.pas(68): Variable 'WList1' might not have been initialized

Ich muss die Variable initialisieren. ich habe nur keine ahnung wie das bei der geht. bei integer und string ist mir das klar, aber wenn ein array und eine integer drin ist, wie macht man das dann?

was ich nicht so gerne machen würde ist einfach ein normales array und dann abfragen wie voll es ist (also wann das erste leere fach kommt...), meine class soll noch etwas mehr können später...

ich hoffe es kann mir jemand helfen, bitte nicht mit zu vielen fachausdrücken erklären, ich bin noch nicht so arg gut mit delphi vertraut.

[DeddyH]

Legst Du denn auch eine Instanz der Klasse an, bevor Du darauf zugreifst (also ein Aufruf der Art Klasse := TKlasse.Create; )?

[Sh4dd4r]

oh mist... nätürlich... wo muss ich das machen und wo muss ich sie wieder freeen?

[sirius]

Na, bevor du sie das erste mal benutzt und nachdem du sie das letzte mal benutzt.
Als erster Vorschlag (ohne den Code zu kennen) würde ich sagen im FormCreate und im FormDestroy


Dann würde ich dir noch einen Tip des dynamischen Arrays:
x: array of string und weil das auch noch nicht so toll ist, eine List:
TStringList
empfehlen.

[Sh4dd4r]

hab die class jetzt in on show created, ich muss aber die variable noch irgendwo deklarieren und sie muss private sein. wo mach ich das am besten? im private teil ist zu früh, da ist die class noch nicht definiert
und wenn ichs in on show mache ist sie nicht private...

[DeddyH]

OnShow hat doch mit private nichts zu tun.

[Sh4dd4r]

ja, aber andere prozeduren wollen ja auf die variable zugreifen, ich muss sie aber vor on show deklarieren...

[DeddyH]

Schreib die Variable in den private-Abschnitt, instanziiere sie OnCreate und gib sie OnClose wieder frei.

[Sh4dd4r]

dann muss ich die klassendeklaration vor private schreiben.... wie mach ich das?

[DeddyH]

Schreib die komplette Klassendeklaration vor die des Formulars.

Delphi-Quellcode:

type TMyclass = class
  ...
end;

TMyForm = class(TForm)
private
  MyClass: TMyClass;
  ...
end;