String merupakan salah satu tipe
variabel dalam Delphi yang memiliki anggota berupa karakter alphanumeric (angka
dan huruf). Jika variabel ‘char’ hanya memiliki anggota satu anggota, maka
variabel ‘string’ ini mirip dengan variabel char namun memiliki banyak anggota.
Contoh variabel char : ‘a’, ‘b’, ‘1’, ‘2’, dalam kasus ini akan dibahas fungsi
copy. Procedure ‘Copy’ digunakan untuk
menyalin sebuah substring dari variabel string ‘str’ dimulai dari indeks
‘index’ sebanyak ‘count’ karakter. Dimana Fungsi String Copy Menghasilkan sebuah
substring dari suatu string,dengan kata lain fungsi copy digunakan untuk mengambil
beberapa karakter dari suatu teks tertentu.
Syntak Dasar
Copy
(str, index, count);
Contoh :
var
s : string;
begin
s := 'Universitas';
edit1.Text := copy(S,4,5);
end;
HASIL : “versi”
Implementasi
Di Delphi
Berikut ini adalah contoh implementasi
ilustrasi di atas mengunakan Delphi. Buat project Delphi baru, ambil komponen
TButton, TLabel dan TEdit dari Component Pallete ke Form Designer. Atur
peletakannya. Selanjutnya Buat Coding di Button dengan Even On Click
procedure TForm1.Button1Click(Sender:
TObject);
var
a,b : string;
begin
a := edit1.Text;
b := copy(a,5,9);
label1.Caption := b;
end;
Output
CONTOH FUNGSI STRING COPY |
No comments:
Post a Comment