Hallo,
ich benutze den FastScriptEditor.
Ich habe in einem Formular mehrere Comboboxen.
Im Ereignis OnAfterChange möchte ich ermitteln welcher Wert ausgewählt wurde.
Ich habe folgende Prozedur erstellt; (p_Sender: CHcFormsElement) muss eingestellt sein,
sonst kann ich die Prozedur nicht als Ereignis zuweisen.
Das erst 'OK' 'Showmessage-Fenster kommt noch - doch dann tritt der Fehler ein.
Delphi-Quellcode:
procedure Feststellen_ComboText(p_Sender: CHcFormsElement);
var
C_Sender : TCombobox;
hs : TStringList;
tx : String;
begin
try
C_Sender := TComboBox(p_Sender.UniqID);
showmessage ('OK');
// tx := C_Sender.items.text; :twisted:
tx := C_Sender.text;
showmessage ('2. OK' + tx) ;
hs.Text := C_Sender.items.text;
showmessage (hs.Text) ;
finally
showmessage ('Fehler') ;
hs.Free;
end;
end;