Open Dialog

**Jan.R**

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:

markieren

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**

Ist Button2 der "Startbutton" und welche Exception kommt?

**Sir Rufo**

Hallo, bitte benutze doch die Delphi-Tags für Delphi-Code:

markieren

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

) und vermute mal, dass "vokabeln" noch nicht instantiert wurde.

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

cu

Oliver

**himitsu**

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**

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**

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

**Sir Rufo**

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 von Jan.R:

Aber was heißt ".free" ???

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

**Luckie**

Der Rest der Prozedure wäre auch nicht ganz uninteressant.

Open Dialog

Open Dialog

Re: Open Dialog

Re: Open Dialog

Re: Open Dialog

Exception

Open Dialog

Re: Open Dialog

Re: Open Dialog

Forumregeln

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.624 Beiträge Delphi 12 Athens	#2 Re: Open Dialog 14. Jan 2009, 17:33 Ist Button2 der "Startbutton" und welche Exception kommt? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.063 Beiträge Delphi 12 Athens	#4 Re: Open Dialog 14. Jan 2009, 17:35 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 Neuste Erkenntnis: Seit Pos einen dritten Parameter hat, wird PoSex im Delphi viel seltener praktiziert.
	Zitat

Jan.R Registriert seit: 25. Aug 2008 37 Beiträge	#5 Exception 14. Jan 2009, 17:36 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 Moinsen!!!
	Zitat

Jan.R Registriert seit: 25. Aug 2008 37 Beiträge	#6 Open Dialog 14. Jan 2009, 17:38 vokabeln := tstringlist.create hab ich natürlich schon. Aber was heißt ".free" ??? Moinsen!!!
	Zitat

Luckie Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional	#9 Re: Open Dialog 14. Jan 2009, 17:40 Der Rest der Prozedure wäre auch nicht ganz uninteressant. Michael Ein Teil meines Codes würde euch verunsichern.
	Zitat