Bitte Quelltext ändern:
Unter procedure HalleClick(Sender: TObject);
bitte procedure dateiladen(dateiname: string);
einfügen.
Das vorhandene procedure dateiladen(dateiname: string);
ändern in procedure TmainFrm.dateiladen(dateiname: string);
In der procedure dateiladen
bitte die Zeile ListView1: TListView;
entfernen.
application.terminate;
durch Close;
ersetzen.
Ah, okay. Jetzt geht das.
Ich muss mich mit der procedure auf das Formular beziehen. Und ich dachte, das müsste ich nur direkt bei den Komponenten die sich auf dem Formular befinden.
Bei der Explode Funktion brauch ich das nicht weil die keine Komponenten anspricht.
Versteh ich das richtig?