Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
ALUCARD
Üye
Mesajlar: 1270 Kayıt: 27 Eyl 2003 10:12
Konum: Samsun
İletişim:
Mesaj
gönderen ALUCARD » 12 Kas 2005 02:59
arkadaşlar benimn sorunum elimde 11 haneli tckimlik nosu var
benım bunu 11 ayrı parçaya bolmem lazım çünkü her sayıyı farklı yere yazmam lazım
bi türlü beceremedim
bi yardım ederseniz sevinirim.
بِسْمِ اللهِ الرَّحْمنِ الرَّحِيمِ
Forumun 365 . Üyesi
Hiç Bir Şey İnsan Kadar
Yükselemez ve
Alçalamaz
Erkan ÇAĞLAR
a_o
Üye
Mesajlar: 84 Kayıt: 18 Eki 2005 04:41
Konum: Tekirdağ
Mesaj
gönderen a_o » 12 Kas 2005 03:04
mrb
copy fonksiyonuyla teker teker alabilirsin karakterleri;)
ii çalışmalar
ALUCARD
Üye
Mesajlar: 1270 Kayıt: 27 Eyl 2003 10:12
Konum: Samsun
İletişim:
Mesaj
gönderen ALUCARD » 12 Kas 2005 03:06
a_o yazdı: mrb
copy fonksiyonuyla teker teker alabilirsin karakterleri;)
ii çalışmalar
hocam bi örnek yazabilirmisin
teşekkür ederim.
بِسْمِ اللهِ الرَّحْمنِ الرَّحِيمِ
Forumun 365 . Üyesi
Hiç Bir Şey İnsan Kadar
Yükselemez ve
Alçalamaz
Erkan ÇAĞLAR
mussimsek
Admin
Mesajlar: 7604 Kayıt: 10 Haz 2003 12:26
Konum: İstanbul
İletişim:
Mesaj
gönderen mussimsek » 12 Kas 2005 03:14
Copy(string değer, başlangıç karakteri, kaç karakter kopyalanacak)
mesela
Copy('123456789', 1,3)
1. karakterden başlar, 3 karakter kopyalar. Yani '123' ü alır. Bu şekilde istediğin gibi parçalayabilirsin.
Bu arada yöntemin bana biraz garip geldi?? Neden TC Kimlik No'yu 11 parça gösteresin???
Kolay gelsin.
ALUCARD
Üye
Mesajlar: 1270 Kayıt: 27 Eyl 2003 10:12
Konum: Samsun
İletişim:
Mesaj
gönderen ALUCARD » 12 Kas 2005 03:17
mussimsek yazdı:
Bu arada yöntemin bana biraz garip geldi?? Neden TC Kimlik No'yu 11 parça gösteresin???
hocam matbu bir form var tc kimlik numarasının herbirinin bir kutuya denk gelmesi gerekiyor da ondan
بِسْمِ اللهِ الرَّحْمنِ الرَّحِيمِ
Forumun 365 . Üyesi
Hiç Bir Şey İnsan Kadar
Yükselemez ve
Alçalamaz
Erkan ÇAĞLAR
ALUCARD
Üye
Mesajlar: 1270 Kayıt: 27 Eyl 2003 10:12
Konum: Samsun
İletişim:
Mesaj
gönderen ALUCARD » 12 Kas 2005 03:40
hocam cok teşekkür edrim istediğim gibi oldu
Kod: Tümünü seç
edit3.Text:= copy(edit1.Text,strtoint(edit2.Text),1);
yapmak istediğimde buydu
بِسْمِ اللهِ الرَّحْمنِ الرَّحِيمِ
Forumun 365 . Üyesi
Hiç Bir Şey İnsan Kadar
Yükselemez ve
Alçalamaz
Erkan ÇAĞLAR
fduman
Moderator
Mesajlar: 2749 Kayıt: 17 Ara 2004 12:02
Konum: Ankara
Mesaj
gönderen fduman » 12 Kas 2005 09:39
veya bir döngü ile
Kod: Tümünü seç
// bu tc kimlik no olsun
edit1.text:= '23121332312123';
edit2.text:= edit1.text[1];
edit3.text:= edit1.text[2];
....
....