Fungsi Pos dan Right String Delphi

Apa kabar kawan-kawan, sudah lama tak berjumpa kembali tutorial kali ini adalah tentang fungsi pos dan Right String dari delphi

ini adalah fungsi right string yang terdapat pada delphi

function RightStr(const AText: AnsiString; const ACount: Integer): AnsiString; overload;

kemudian fungsi Pos

function Pos(const SubStr, Str: _ShortStr; Offset: Integer): Integer;

disini kita akan memanfaatkan kedua fungsi tersebut untuk melakukan pemotongan karakter dari sisi kiri ke kanan dengan ketentuan yang kita buat
Langkah pertama sediakan form dan beberapa Edit Text dan Sebuah Button

selanjutnya adalah Ketik Kode dibawah ini kedalam Program anda

hasilnya adalah nantinya seperti ini, dengan delimeter ' ' (Spasi), bisa juga dengan pemisah kata yang lain, misal '@' dsb.

untuk lebih jelasnya bisa anda lihat di youtube

sekian dan terimakasih
semoga bermanfaat untuk kita semua