Einzelnen Beitrag anzeigen

Kratons

Registriert seit: 20. Okt 2014
Ort: Deutschland
12 Beiträge
 
FreePascal / Lazarus
 
#1

External error: SIGSEGV

  Alt 21. Okt 2014, 18:30
Hallo allerseits,
ich habe momentan ein problem.
Untzwa habe ich 3 toogelbuttons, welche sollten sie betätigt (Mausklick) werden,
die beiden anderen deaktiviren sollten und eine Variable setzten.
eigentlich geht es heirbei um eine sprachauswahl.

Code:
procedure Tfmoptions.tbtnDEClick(Sender: TObject);
begin
    gSprache:='De';
    tbtnDE.Checked:=True;
    tbtnEN.Checked:=False;
    tbtnFR.Checked:=False;
end;

procedure Tfmoptions.tbtnENClick(Sender: TObject);
begin
    gSprache:='En';
    tbtnEN.Checked:=True;
    tbtnDE.Checked:=False;
    tbtnFR.Checked:=False;
end;

procedure Tfmoptions.tbtnFRClick(Sender: TObject);
begin
    gSprache:='Fr';
    tbtnFR.Checked:=True;
    tbtnDE.Checked:=False;
    tbtnEN.Checked:=False;
end;
das kompillieren an sich funktionirt soweit, und auch die anderen funktionen funktuioniren soweit Prima.
der fehler tritt aus sobalt ich im Debugger ( das war der doch wenn ich F9 drück oder) auf einen der köpfe klicke.
schwups macht es die Fehlermeldung:

"Project VN-System hat Exeption-Klasse: >>SIGSEGV<< ausgelöst.
Bei Adresse: 773c8EF1"

und er beendet das programm.
hab auch schon probiert die .exe einfahc ohne lazarus zu starten --> Error202

Bitte um Hilfe,
und schonmal danke an alle Helfer.
  Mit Zitat antworten Zitat