ListView - mit Dateien füllen und auf Inhalt prüfen

[Christian Seehase]

Moin atgis,

ersetze mal

****HIER DATEINAME DES LISTVIEW ITEM****

durch

Form1.ListView1.Selected.Caption

Dann lege mal einen Breakpoint auf die Zeile, und schau Dir an, was da drin steht.
Wenn OK (wovon auszugehen ist) kannst Du dann mal im Einzelschritt (F7) durchgehen, wo's hakt.

BTW:

Delphi-Quellcode:

//Inhalt in StringGrid laden
procedure TForm1.ListView1DblClick(Sender: TObject);
begin
try form3.show;
except ShowMessage('Keine Datei gewählt');
end;
end;

finde ich nicht so schön.
try/except sollte man nur sehr sparsam einsetzen, und nur dann, wenn es wirklich nicht anders geht.

Wenn Du es, z.B., so machst, wird der Code sauberer.

Delphi-Quellcode:

//Inhalt in StringGrid laden
procedure TForm1.ListView1DblClick(Sender: TObject);
begin
  if not Assigned(Form1.ListView1.Selected) then exit;
  form3.show; // evtl. auch ShowModal
end;