View Full Version : گذاشتن شرط با Memo.Text
matinebi
چهارشنبه 06 آذر 1387, 12:46 عصر
چرا برنامه از این کد رد میشه زمانی که در memo هیچ چیز وارد نمیشه
if Memo1.Text='' then
begin
ShowMessage('ÊæÖíÍ');
Memo1.SetFocus;
end
mafazel
چهارشنبه 06 آذر 1387, 13:18 عصر
دلیل خاصی نداره احتمالا مشکل از جای دیگه ای هست.
فقط برای اطمینان اولا بجای Memo1.Text از Memo1.Lines.Text استفاده کنید. در ثانی بهتره در دستور if از Trim استفاده کنید:
if Trim(Memo1.Lines.Text)='' then ...
mossaferin
چهارشنبه 06 آذر 1387, 13:29 عصر
سلام
اگه واقعا هیچی توی ممو نداری کد رو اینطوری اصلاح کن
if Trim(Memo1.Text)='' then
begin
ShowMessage('ÊæÖíÍ');
Memo1.SetFocus;
end
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.