Comboboxdaki stringi okuyup dbedite sabit değer atamak

guney_tosun · Mesaj gönderen **guney_tosun** » 07 Eyl 2005 12:29

Selamlar;
Bir tane combobox'ım var itemların HOLD,WAIT,DELIVERY var .

Ben hold seçtiğimde dbedit1'in değerinin 56-126 olmasını istiyorum

Ama işin mantığını kuramadım yada sabahladım o yuzden kafam karışık.

Teşekkürler

Mesaj gönderen **Asri** » 07 Eyl 2005 12:43

Merhaba,
Combobox ın OnExit eventına aşağıdaki gibi bir kod yazabilirsiniz.

Kod: Tümünü seç

procedure TForm1.ComboBox1Exit(Sender: TObject);
    begin
        IF COMBOBOX1.TEXT='HOLD' THEN
          TABLE1.FIELDBYNAME('DEGER').ASSTRING:='55-126';


    end;

İyi çalışmalar.

___________________
ofenX

Mesaj gönderen **lazio** » 07 Eyl 2005 12:45

combobox tan değer seçitiğinde dbedit in bağlı olduğu tablo ve alana istediğin değeri aktar.
örneğin,

if Combobox.Text = 'Hold' then
Table1Alan1.Value := 56;
else if....
.....
gibi.

dikkat etmen gereken bu işlem sırasında Table1 in Insert yada Edit modunda olması gerektiğidir.

guney_tosun · Mesaj gönderen **guney_tosun** » 07 Eyl 2005 01:37

Teşekkür ederim arkadaşlar sağolun..

Mesaj gönderen **aLonE CoDeR** » 07 Eyl 2005 02:32

lazio yazdı:
Kod: Tümünü seç
if Combobox.Text = 'Hold' then

bu kod combonun tüm içeriğini verir sanırım...

Mesaj gönderen **lazio** » 07 Eyl 2005 02:40

bLue aLonE yazdı:
lazio yazdı:
Kod: Tümünü seç
if Combobox.Text = 'Hold' then
bu kod combonun tüm içeriğini verir sanırım...

combonun tüm içeriğini veren;
combobox.items.Text dir..

Mesaj gönderen **aLonE CoDeR** » 07 Eyl 2005 02:58

Pardon, bugün doktorla tartıştım hala kafam yerine gelemedi

Mesaj gönderen **lazio** » 07 Eyl 2005 04:15

geçmiş olsun hocam.

Mesaj gönderen **aLonE CoDeR** » 07 Eyl 2005 04:50

Teşekkürler..