|
Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
AW: brauche dringend hilfe bei der combobox !!!
2. Nov 2010, 17:53
wie wär es hiermit:
Delphi-Quellcode:
procedure TForm1.MyComboboxChange(Sender: TObject);
var
heer:integer;
begin
if MyCombobox.text='schwer' then
heer:=1000
else
heer:=500;
end;
Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
|