Delphi 7 Tc Kimlik Bulma

Delphi 7 ile TC Kimlik Numarası Bulma

TC kimlik numarası, Türkiye Cumhuriyeti vatandaşlarına verilen 11 haneli bir numaradır. Bu numara, kişinin doğum tarihi, cinsiyeti ve doğum yeri gibi bilgilerini içerir. TC kimlik numarası, birçok resmi işlemde kullanılır. Bu nedenle, Delphi 7 ile TC kimlik numarası bulma işlemini öğrenmek, programcılar için önemlidir.

Delphi 7 ile TC Kimlik Numarası Bulma Adımları

  1. Delphi 7’yi açın ve yeni bir proje oluşturun.
  2. Form’a bir Edit kontrolü ekleyin. Bu kontrol, kullanıcının TC kimlik numarasını girmesini sağlayacaktır.
  3. Form’a bir Button kontrolü ekleyin. Bu kontrol, kullanıcının TC kimlik numarasını bulmasını sağlayacaktır.
  4. Button kontrolünün OnClick olayına çift tıklayın. Bu, Button kontrolünün tıklandığında çalıştırılacak kodu yazmanızı sağlayacaktır.
  5. Aşağıdaki kodu Button kontrolünün OnClick olayına yazın:

“`
procedure TForm1.Button1Click(Sender: TObject);
var
TCNo: string;
DogumTarihi: string;
Cinsiyet: string;
DogumYeri: string;
begin
TCNo := Edit1.Text;

if TCNo.Length <> 11 then
begin
ShowMessage(‘TC kimlik numarası 11 haneli olmalıdır.’);
exit;
end;

DogumTarihi := TCNo.SubString(1, 6);
Cinsiyet := TCNo.SubString(7, 1);
DogumYeri := TCNo.SubString(8, 4);

ShowMessage(‘Doğum Tarihi: ‘ + DogumTarihi);
ShowMessage(‘Cinsiyet: ‘ + Cinsiyet);
ShowMessage(‘Doğum Yeri: ‘ + DogumYeri);
end;
“`

  1. Delphi 7’yi çalıştırın ve formu çalıştırın.
  2. Edit kontrolüne TC kimlik numaranızı girin ve Button kontrolüne tıklayın.
  3. TC kimlik numaranızın doğum tarihi, cinsiyeti ve doğum yeri bilgilerini göreceksiniz.

Faydalı Siteler ve İlgili Dosyalar

Yayımlandı

kategorisi