combobox.itemintex kontrolü

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
hich1shey
Üye
Mesajlar: 10
Kayıt: 31 Tem 2005 02:47
Konum: İstanbul

combobox.itemintex kontrolü

Mesaj gönderen hich1shey »

combobox'ımda 4 adet item var: 2 4 6 8,
edit deki sayıyla bunlar karşılaştırılıyor

edit'teki sayı 2,5 ve combobox'ta seçili rakam da 2 olsun,
ben button'a bastığımda 'rakam uygun değildir' mesajı veriyor.
combobox'tan 4'ü seçip button'a bastığımda 'uygundur' diyor,

buraya kadar olan kısmını hallettim ama istediğim şu:

combobox'tan 8'i seçtiğimde bana
'seçtiğiniz rakam uygundur ama 4 daha uygundur'
mesajı versin istiyorum.. mümkün müdür?

teşekkürler...
true_false
Üye
Mesajlar: 401
Kayıt: 22 Tem 2004 02:03
Konum: sıkıntı çekmişlere yakın bi yerden

Mesaj gönderen true_false »

nedemek istdiğin pek anlaşılır değil ama anladığım kadarıyla
comboboxına desigin time anında kendinmi items geçiyorsun eğer Öyleyse ilk yaptıkarını İkincisinde uygula sadece mesajını değiştir.
:!: :!: :!: :? :? :? :?
type
Tform1 = class(Tform)
Kullanıcı avatarı
ender_arslanturk
Kıdemli Üye
Mesajlar: 709
Kayıt: 18 Şub 2005 03:38
Konum: İstanbul

Mesaj gönderen ender_arslanturk »

Merhaba

Kod: Tümünü seç

if ComboBox1.ItemIndex=4 then
begin
    ShowMessage('  :D  ');
    ComboBox1.ItemIndex:=2;
end;
Saygılar,
Kullanıcı avatarı
hich1shey
Üye
Mesajlar: 10
Kayıt: 31 Tem 2005 02:47
Konum: İstanbul

Mesaj gönderen hich1shey »

aslantürk; çok saol ama benim istediğim daha faklı bişey...
DAHA ANLAŞILIR ANLATMAK İSTİYORUM:..

(bS) kablo kesitleri (combobox item'leri): (bunlar sabit)
1,5
2,5
4
6
10
16
25
32
50
70
95
120
150
185
240
300

S(Kesit)'i
S:=P*L/sqr(U)/sqrt(3)/K/BGD
formülünden elde ediyorum (edit1'in Text'i): (bu değişken)..

bS 'yi 300 seçtim diyelim, işlem sonucu bS>S olmalı.
S ise 40 hesaplandı, karşılaştırma sonucu bana vereceği mesaj
"300 uygundur ama 50 daha uygundur" olmalı.

"--Sonuca en yakın ve büyük olan değeri bulacak.--"

300'ü kullanırsam projenin maliyeti artacak, bu konuda beni uyarmasını istiyorum.

zamanınızı almayacaksa yardımcı olursanız sevinirim...
Cevapla