arkadaşlar ilğinç bir durumla karşılaştım burda paylaşıp fikir almak istedim
delphi7 de 2 adet string değeri karşılaştırarak eşit mi değil mi diye <> bu kodla karşılaştırma yapıyordum ve hata almıyordum
aynı olayı lazarusda yaptığımda hata aldım..
şansıma karşılaştırma değerlerim rakam olduğu için integere çevirdim denedim hata almadım
merak ettiğim string değerleri karşılaştırma yaparken özellikle eşitdeğil (<>) de sizle hangi yöntemi kullanıyorsunuz.
if _fiyat <> dbFiyat then
begin
Tur:=2; //özel fiyat
end;
if StrToInt(_fiyat) <> StrToInt(dbFiyat) then
begin
Tur:=2; //özel fiyat
end;
(23-01-2019, Saat: 16:39)sadikacar60 Adlı Kullanıcıdan Alıntı: [ -> ]arkadaşlar ilğinç bir durumla karşılaştım burda paylaşıp fikir almak istedim
delphi7 de 2 adet string değeri karşılaştırarak eşit mi değil mi diye <> bu kodla karşılaştırma yapıyordum ve hata almıyordum
aynı olayı lazarusda yaptığımda hata aldım..
şansıma karşılaştırma değerlerim rakam olduğu için integere çevirdim denedim hata almadım
merak ettiğim string değerleri karşılaştırma yaparken özellikle eşitdeğil (<>) de sizle hangi yöntemi kullanıyorsunuz.
if _fiyat <> dbFiyat then
begin
Tur:=2; //özel fiyat
end;
if StrToInt(_fiyat) <> StrToInt(dbFiyat) then
begin
Tur:=2; //özel fiyat
end;
Merhabalar,
İlk aklıma gelen boşluk olmasından kaynalı olabilir.
Trim fonksiyonu ille boşlukları (baş-son) iptal edip deneyebilirsiniz.
Kolay gelsin.
Programlama dillerinde genelde switch case yapısında string kullanamazsınız. Derleyiciyi yazanlar buna sebep olarak karşılaştırmanın bitsel yapıldığını söylerler string ile widestring in farklı olduğunu vurgularlar belki sizin sorununuzda türlerle alakalıdır.
Merhaba,
string diyorsun ama sanki sayısal değerden dönüşmüş stringe benziyor.
debug ile değerlerine baktın mı?
ya da showmessage ile kontrol ettin mi?
Comparevalue fonksiyonunu denemenizi tavsiye ederim. Sayısal bilgiler içinde math.Comparevalue
TEŞEKKÜRLER
trim ile boşlukları kaldırmak aklıma gelmedi muhtemelen ondan hata verdi
ama CompareStr komutu en iyisi sanırım bundan sonra bu komutu kullanacağım
saygılarımla
