Der Fehler mit beim Start-Button ist beseitigt.
Alle Startpunkte werden getestet.
(OK - es funktioniert nur von Punkt 1 und 2 aus)
Global definierte, aber nur Lokal verwendete Variablen/Proceduren, wurden in den entsprechenden lokalen Bereich verschoben.
Die nicht verwendete Variable "Zaehler" wurde entfernt.
...
Wer keinen Start-Button haben möchte, der braucht nur die Prozedur für das Form1-OnCreation-Ereignis folgender Masen zu ändern. ^^
Delphi-Quellcode:
Procedure TForm1.FormCreate(Sender: TObject);
Begin
BT_startClick(Sender);
End;
[ADD]
Ach ja, wieso heißt eigendlich die ListBox "Memo1"?
und das DoppelClick-Ereignis wird jetzt auch für das OnClick-Ereignis verwendet.
Also reicht jetzt ein einfacher Click zum Anzeigen schon aus. Und beim Item-Wechsel mittels Tastatur wird es auch angezeit.
Ein Therapeut entspricht 1024 Gigapeut.