سوال: این کد چیکار میکنه؟ [بایگانی]

View Full Version : سوال: این کد چیکار میکنه؟

Mask

جمعه 01 بهمن 1389, 23:11 عصر

با سلام
میخواستم بدونم این کد چیکار میکنه؟

var i:integer;
begin
i:=integer(Edit1.Text)+integer(Edit1.Text);
Edit2.Text:=IntToStr(i);
end;

حمید محمودی

جمعه 01 بهمن 1389, 23:31 عصر

سلام،
کارکتر عدد که بصورت رشته در Edit1 وارد شده رو به عدد تبدیل میکنه و با خودش جمع میکنه و حاصل رو درمتغییر i میزاره و این متغییر رو در Edit2 بصورت عدد (رشته ای) قرار میده.

Mask

شنبه 02 بهمن 1389, 12:06 عصر

ممنون.
مقدار عددی موجود در edit1 فقط عدد یک هست.
اما جمعه شون یه چیزه دیگه در میاد.(در حقیقت با صحبت شما باید عدد 2 برگرده ، اما یه عد بزرگ در میاد.)

vcldeveloper

شنبه 02 بهمن 1389, 15:06 عصر

Edit1.Text را به Integer تبدیل نوع (Typecast) میکنه. با این کار، مقدار اشاره گر Edit1.Text (رشته ها به صورت Pointer در دلفی تعریف شدند) برگشت داده میشه. این مقدار آدرس اولین کارکتر موجود در Edit1.Text در حافظه هست. این آدرس حافظه را با خودش جمع میکنه، و نتیجه جمع را تبدیل به string میکنه و در Edit2.Text نمایش میده.

کدش فاقد ارزش هست، فقط شاید به درد تست و آزمون در هنگام مصاحبه و مواردی از این دست بخوره.