Einzelnen Beitrag anzeigen

khh

Registriert seit: 18. Apr 2008
Ort: Südbaden
1.929 Beiträge
 
FreePascal / Lazarus
 
#1

combobox bringt exception

  Alt 6. Mai 2009, 09:46
hallo zusammen,
ich habe bei einer combobox autocomplete auf true gestellt.
mit:
Delphi-Quellcode:
procedure Tdruckuebersichtform.kdComboBox3Change(Sender: TObject);
begin
    {kunden_id  übernehmen }
     //-- harter typcast
     Obj3 := TKunde(self.kdCombobox3.Items.Objects[self.kdCombobox3.ItemIndex]);
         if Assigned(Obj3) then
         fauftragkd_id:= obj3.KUNDEN_ID
     else
     begin
     // Fall "Alle"
      fauftragkd_id:= 0;
     end;
lese ich die kd_id aus.

dies funktioniert solange ich den Kunden per mausklick aus dem Feld auswähle.
da habe ich, wenn ich mir obj3 anzeigen lasse einen Zeiger auf Tlisteninhalt an adresse xy

Wenn ich per autocomplete wähle, also einen buchstaben eintippe, bekomme ich eine exception mit
einem obj3 welches auf einen leeren Speicherbereich also ???0xFFF zeigt.

was läuft da falsch bzw.kann ichanders machen?

danke Gruss KH
Karl-Heinz
  Mit Zitat antworten Zitat