Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
rapsodim
Üye
Mesajlar: 147 Kayıt: 15 Eki 2003 03:52
Mesaj
gönderen rapsodim » 26 Nis 2006 09:03
Dbgrid içindeki stün bilgileri;
asd 45 tr
as 48 df
fg 788 rrr şeklindedir.Bu bilgilerin içindeki boşlukları nasıl çıkartıp
asd45tr
as48df
fg788rrr şekline getirebilirim.
hdayi
Kıdemli Üye
Mesajlar: 1284 Kayıt: 29 Oca 2004 01:53
Konum: Erciyes'in eteklerinden.
Mesaj
gönderen hdayi » 26 Nis 2006 09:16
ansireplacestr, replacestr
Kolay Gelsin...[/code]
Bişnev in ney çün hikâyet mîküned
Ez cüdâyîhâ şikâyet mîküned
aslangeri
Moderator
Mesajlar: 4322 Kayıt: 26 Ara 2003 04:19
Konum: Ankara
İletişim:
Mesaj
gönderen aslangeri » 26 Nis 2006 09:17
s.a.
sanırım trim fonkisyonu işinize yarar.
(trimall gibim birşeydi)
fieldın ongettext eventinda yapacaksınız bu işlemi.
kolay gelsin.
Duyduğun Şeylerin Söylediklerim Olduğuna Eminim Ama
Anladığın Şeylerin Anlatmak İstediklerim Olduğuna Emin Değilim
hdayi
Kıdemli Üye
Mesajlar: 1284 Kayıt: 29 Oca 2004 01:53
Konum: Erciyes'in eteklerinden.
Mesaj
gönderen hdayi » 26 Nis 2006 09:21
Delphi Help yazdı: Description
Trim removes leading and trailing spaces and control characters from the given string S.
"
Control Characters " de nedir?
Bişnev in ney çün hikâyet mîküned
Ez cüdâyîhâ şikâyet mîküned
undefined
Moderator
Mesajlar: 565 Kayıt: 06 Eki 2003 12:01
Konum: Bursa
İletişim:
Mesaj
gönderen undefined » 26 Nis 2006 09:32
hdayi yazdı: Delphi Help yazdı: Description
Trim removes leading and trailing spaces and control characters from the given string S.
"
Control Characters " de nedir?
#13, #10 gibi satır atlatma ve satır sonu belirtme karakterlerine diyorlar
rapsodim
Üye
Mesajlar: 147 Kayıt: 15 Eki 2003 03:52
Mesaj
gönderen rapsodim » 26 Nis 2006 10:15
Arkadaşlar cevaplarınız için tşkr ederim fakat dediklerinizle olmuyor.
Demitri
Mesaj
gönderen Demitri » 26 Nis 2006 10:47
eğer her bir kelime ayrı ayrı ise trim komutu işine yarar ama
boşluk kelime içinde ise
Kod: Tümünü seç
function removespaces(s:string) : string;
var
t : string;
i:integer;
begin
t:='';
for i :=1 to length(s) do
if s[i]<>' ' then t:=t+s[i];
result:=t;
end;
fonksiyonu işini görür.
kulanımı
Kod: Tümünü seç
yenistring:=removespaces(eskistring);
iyi çalışmalar.