edit içinde edit bilgisini alma

[metemete]

S.A.
cursor editte iken editin içeğini nasıl öğrenebilirim
kullanıcı o anda tutar rakam girerken toplamedit o anda gösterilsin diye

timer ile cursor tutar editte iken edit bilgisini okutmak ıstıyorum.ama tutareditten exıt olmadan deger vermıyor

Kod: Tümünü seç

procedure TPuan_Hareket.Timer1Timer(Sender: TObject);

begin
if JvDotNetDBEditTOPLAM.text<>'' then begin
 try

 toplam := strtofloat(JvDotNetDBEditNETTOPLAM.text);
finally
  isk := strtofloat(JvBAYI_PUAN_KATSAYI.text);
// nettoplam := strtofloat(JvDotNetDBEditNETTOPLAM.text);
 iskonto := (toplam * isk)/100;
 nettoplam := toplam - iskonto;
 JvDotNetDBEditISKONTO.text:=FloatTostr(ISKONTO);
 JvDotNetDBEditNETTOPLAM.text:=FloatTostr(nettoplam);
end;

[Battosai]

Ben bişey anlamadım...

[Search]

Bende fazla anlamadım ama Anladıgım kadarıyla editin onchange olayıyla ilgili bi durum galiba

[Query]

OnChange olayına da OnKeyPress olayına da bişiler yazarak o anlık değeri alabilirsiniz.

[metemete]

: ) anlatamadım o zaman ornek vererek anlatayım

formun üzerinde bir timer1 bir edit1 koyduk
edit1 den cıkınca edit.text in son değeri alınabıliyor
aksi halde imlec edit 1 de iken edit.textin içeriğini değiştirdik
imlec edit1 içinden cıkmadan edit.text son değeri alınamıyor
timer ilede 300 milisaniye aralıklarla edit1.text değerini okutmak ıstıyorum

[conari]

Keypress de bunu alabilmeniz lazım. Cursor içerde olsun farketmez.

[Query]

timer kullanmak zorundaymışsın gibi yazmışsın ama bunun en uygun yolu aslında onchange dir. Her tuşa bastığınızda bu tetiklenir.

OnChange olayına

Kod: Tümünü seç

Showmessage(Edit1.Text);

yazın sonuç istediğiniz gibi mi bir bakın. İmleç Edit1 de olsa da yani Exit olayı gerçekleşmese de sonucu alırsınız.