Wednesday, 20 March 2013

mengambil 2 huruf terakhir dari editbox



Imam Chalimi Bin Moeslim
uses StrUtils;

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:=RightStr(Edit2.Text,2);
end;

No comments:

Post a Comment

Install Fortesreport community Delphi 7 dan RX Berlin

Download  Pertama2 kita harus punya file installernya terlebih dahulu, download  https://github.com/fortesinformatica/fortesrepo...