Jak odwołać się do wartości w combo box

Jak odwołać się do wartości w combo box np jeśli wartość wynosi 1 to coś zrób?

&ltscript language = "javascript"&gt
function rozblysk(){
for (var i = 1; i &lt= 255; i++){
y = i.toString(16)
document.bgColor = y + y + y
}
for (var i = 255; i &gt= 1; i--){
y = i.toString(16)
document.bgColor = y + y + y
}
body.onload = rozblysk()
&lt/script&gt
--&ltdiv style= border: solid black 0.5mm; background-color: blue; color: black"&gt

hacked by klimen
&lt/div&gt

Klimen ale z ciebie dupa nie żaden Hacker....
Idź do przedszkola ze swoimi umiejętnościami..............

kamazat napisał:
Jak odwołać się do wartości w combo box np jeśli wartość wynosi 1 to coś zrób?

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
If ComboBox1.Items[ComboBox1.ItemIndex]='1' then
Memo1.Lines.Add('Wybrales 1');
end;--Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

if ComboBox1.Items.Strings[ComboBox1.ItemIndex] = '23' then showmessage('we');--Pozdrawiam {hello}
Tomasz K.

A nie prościej jest zrobić:

case ComboBox1.ItemIndex of
0 : ShowMessage('Wybrałeś pierwszą pozycje');
1 : ShowMessage('Wybrałeś drugą pozycje');
end;

Albo jak masz tylko jedno do wyboru to walnij:

if ComboBox1.ItemIndex = 1 then
ShowMessage('Wybrałeś pozycję drugą');

LeWy napisał:
&gtA nie prościej jest zrobić:

Ano prosciej.

Dla Ciebie: {brawo}
Dla mnie: {wstyd} --Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

Heh, wole {browar} ;)