Editteki verinin tipini öğrenme

[amatorkaan]

İyi günler... Edite girdiğim bir ifadenin integer mi, string mi veya başka bir şey mi olduğunu anlayacak bir kod lazım. Çünkü metinsel ifade girdiğimde;

Kod: Tümünü seç

i := StrToInt(Edit1.Text)

satırı hata veriyor. Tipi öğreneceğim bir kod olursa bu hatanın önüne geçebilirim. Edite sayı dışında ifade girmeyi yasaklamayı biliyorum, istediğim bu değil. Cevaplarınız için şimdiden teşekkürler.

[sabanakman]

StrToIntDef kullanabilirsin.

Kod: Tümünü seç

i := StrToIntDef(Edit1.Text, -1)

Daha fazla kontrollü olsun istersen TryStrToInt fonksiyonu da kullanılabilir.

Kod: Tümünü seç

if TryStrToInt(Edit1.Text, i) then begin
  ShowMessage(IntToStr(i)+' değeri girildi.');//Edit1.Text
end else begin
  ShowMessage(Edit1.Text+' sayısal bir değer değildir!');
end;

[amatorkaan]

Kardeşim, çok teşekkürler, yardımınla sorunu çözdüm, eline sağlık.