Tags
Author: iisahin - Replies: 9 - Views: 5501
Form filitresindeki virgüllü sayılar..(Bakınız ek dosyası)
Herkese Merhaba,
Sorunum virgül problemi. Tablomdaki bazı değerler ondalık sayı ve bunları tablomda da ondalık sayı olarak görebiliyorum. Alt form da, combo box ile seçimlerimi yaparken de combo box içinde değeri 2,00 yada 3,00 gibi ondalıklı görebiliyorum.Combodan 2,00 seçimini yapınca bana içinde 2 olanlarıo getiriyor.2,15, gibi bir değeri ise problemsiz getiriyor. Tek sayılarda problem yaşıyorum.
Bilmem sorunumu anlatabildim mi.
Araştırdım fakat form ekranında nasıl çözüleceği hakkında bir
Author: şahrapçi - Replies: 0 - Views: 5543
Virgüllü Sayılarda Virgül Öncesi ve Sonrası Ayırma işlemi Son | Dephi Kod Örneği
Delphi
  1. function Split(Input: string; Deliminator: string; Index: integer): string;
  2. begin
  3. if pos(Deliminator,Input) <>0 then
  4. begin
  5. if Index=1 then
  6. Result:=Trim(copy(Input,1,pos(Deliminator,Input)-1))
  7. else
  8. Result:=Trim(copy(Input,pos(Deliminator,Input)+1,255));
  9. end
  10. else
  11. begin
  12. if Index=1 then
  13. Result:=Trim(Input)
  14. else
  15. Result:='';
  16. end;
  17. end;
  18.  
  19.  
  20. a.text:=Split(GTOPLAM.Text, ',', 1);
  21. b.text:=Split(GTOPLAM.Text, ',', 2);



Alıntıdır...