Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Open Dialog (https://www.delphipraxis.net/127503-open-dialog.html)

Jan.R 14. Jan 2009 16:27


Open Dialog
 
Hallo Leute,

ich habe ein Vokabeltrainer programmiert.
Mit hilfe eines OpenDialoges kann man eine Datei auswählen.
Dieser Pfad ist die Vokabeldatei.
Eine Stringlist öffnet diese Datei und wird gestartet.

Code:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
if opendialog1.execute then
vokabeln.LoadFromFile (opendialog1.filename);
Nur wenn ich auf den Start-Button klicke dann erscheint eine Fehlermeldung einer Exception oder so.

Könnt ihr mir helfen???

mfg
Jan

[edit=Matze][delphi]-Tags eingefügt. Zukünftig bitte selbst daran denken. MfG, Matze[/edit]

DeddyH 14. Jan 2009 16:33

Re: Open Dialog
 
Ist Button2 der "Startbutton" und welche Exception kommt?

Sir Rufo 14. Jan 2009 16:34

Re: Open Dialog
 
Hallo, bitte benutze doch die Delphi-Tags für Delphi-Code:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
  if opendialog1.execute then
    vokabeln.LoadFromFile (opendialog1.filename);
Ich schaue mal in die Kristallkugel (von wem hab ich mir die eigentlich geliehen :gruebel: ) und vermute mal, dass "vokabeln" noch nicht instantiert wurde.

Irgendwo in deinem Quelltext müsste mindestens einmal
Delphi-Quellcode:
vokabeln := TStringList.Create;
und im optimalen Falle auch
Delphi-Quellcode:
vokabeln.Free;
auftauchen.

cu

Oliver

himitsu 14. Jan 2009 16:35

Re: Open Dialog
 
wenn die Exception sichtbar ist, dann einfach Strg+C drücken (damit wird der Text-Inhalt dieser Exception in den Zwischenspeicher kopiert) .. mußt nicht alles abschreiben

Jan.R 14. Jan 2009 16:36

Exception
 
Im Projekt Vokabeltrainer.exe ist eine Exception der Klasse EAccessViolation aufgetreten. Meldung:
'Zugriffsverletzung bei Adresse 00455F21 in Modul 'Vokabeltrainer.exe'. Lesen von Adresse 0000000'.
Prozess wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.

Und ja button2 ist der Start-Button

Jan.R 14. Jan 2009 16:38

Open Dialog
 
vokabeln := tstringlist.create hab ich natürlich schon.
Aber was heißt ".free" ???

DP-Maintenance 14. Jan 2009 16:39

DP-Maintenance
 
Dieses Thema wurde von "Matze" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Ein Delphi-Problem (TStringList)

Sir Rufo 14. Jan 2009 16:39

Re: Open Dialog
 
Zitat:

Zitat von Jan.R
vokabeln := tstringlist.create hab ich natürlich schon.

hoffentlich auch an der richtigen Stelle ... aber du geizt ja sehr stark mit deinem quelltext ...
Zitat:

Zitat von Jan.R
Aber was heißt ".free" ???

http://www.delphipraxis.net/internal...t.php?t=150166

Luckie 14. Jan 2009 16:40

Re: Open Dialog
 
Der Rest der Prozedure wäre auch nicht ganz uninteressant.


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:01 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz