...

Arsip: Mendapatkan length dan merekam isi per karakter pada TEdit

 
user image
more 15 years ago

vinno

Aku lagi buat program enkripsi. Nah, untuk mengkonversi per karakter kata yang dimasukkan, aku harus nangkep isi TEdit dan lengthnya. Udah nyari tapi gak ketemu. Tolong dibantu. Newbie nih. :shock:
user image
more 15 years ago

ImanD

sebenernya ga terlalu ngerti maksudnnya. sample simple, (misal Edit1: TEdit) 

var
  i: integer;
begin
  Edit1.Text:='ImanD'; // misalkan
  ShowMessage('Jumlah karakter = '+IntToStr(Length(Edit1.Text)));
  for i:=1 to Length(Edit1.Text) do
    ShowMessage('karakter ke IntToStr(i) adalah '+Edit1.Text[i]);
end;
user image
more 15 years ago

vinno

Wah, iya Mas, thanks, emang gitu kok maksudnya. Maaf, bahasa saya membingungkan, he3. :D
user image
more 15 years ago

zed1308

thanks ya mas,,,kini baruku tahu ada function length,
user image
more 15 years ago

tendafahmi

@zed1308: thanks ya mas,,,kini baruku tahu ada function length,
dari dulu ada mas....:-D
more ...
  • Pages:
  • 1
|
Share to

AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

Last Articles

Last Topic

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com