Bölgesel Dil Ayarları

[m_ekici]

programın girişinde (FormCreate.. de) yazabilirsin parasal/matematiksel görünüm program boyunca burada verdiğin tanımlara göre şekillenir.

Kod: Tümünü seç

procedure TForm1.FormCreate(Sender: TObject);
begin
CurrencyString := '';
DecimalSeparator := ','; 
ThousandSeparator := '.';
end;

[haydarxxx]

sy m_ekici
konu çok uzadı farkındayım bu işin bir çok yolu var ama

CurrencyString := '';
DecimalSeparator := ',';
ThousandSeparator := '.'; gerekli yerre denemiştim fakat Tablosundaki alanların Currency özelligini false yaptığım için göstermiyordu nokta ve virgül ayracını Currency özelligini true yaptığımda ayraçları alıyor ama üç haneli rakam girdiğimde örneğin 232,45 x 232,45 gibi aşagıdaki çarpmayı veriyor ama dört hane olduğunda 1.232,45 noktadan dolayı işlemi yapamıyor


dbedit3.text:=floattostr(strtofloat(dbedit2.text)*strtofloat(dbedit1.text));

Kısacası ben dbedit alanlarında; hem parasal ayraçlı şekli ile değerleri görmek (noktalı ayraçta dahil) hemde bunlar üzerinden hesaplatma yaptırmak istiyorum.

[aslangeri]

[Error] Unit1.pas(45): Undeclared identifier: 'asscurrency'

asscurrency yazarken hatlaı yazmışsınız.
ascurrency olacak. tek "s" ile.
as yazıp "ctrl+space" tuşuna basarsanız size yazabileceğiniz tiplerin listesini verecektir.
kolay gelsin.

[haydarxxx]

aslangeri çok teşekkürediyorum.şimdi tam istediklerim oldu.ok.

[aslangeri]

aslangeri çok teşekkürediyorum.şimdi tam istediklerim oldu.ok.

Önemli değil...