Ergebnis der Suchanfrage

• Forum: Datenbanken

  Re: Fehlermeldungen für Benutzer bauen

   
    by Nils_13, 17. Dez 2006
  Du hast wahrscheinlich vor dem else noch ein end; stehen, entferne das Semikolon und es sollte funktionieren.
  
  
  procedure TForm1.btnfladenClick(Sender: TObject);
  begin
  if OpenDialog1.Execute then
  begin
  if FileExists(OpenDialog1.Filename) then
  lbxFeldnamen.Items.LoadFromFile(OpenDialog1.FileName);
  end;