Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
Delphi iki basamaklı girilen sayıyı karaktere çevirme
procedure TForm1.Button1Click(Sender: TObject);
var
sayi1:integer;
begin
sayi1:=StrToInt(Edit1.Text);
edit2.Text:=inttostr(sayi1 div 10);
edit3.Text:=inttostr(sayi1 mod 10);
edit4.Text:=edit2.Text+' '+edit3.Text;
end;