چک کردن کنترل image

[hyl_piano]

سلام
میخوام بدونم که چه جوری میشه فهمید که یک image ، داخلش عکس قرار گرفته یا نه؟
اون عکس ، ممکنه که هر نوعی باشه: bmp, jpg, gif,...
اگه هم عکسی در یک image قرار گرفته، چه جوری میشه اون image را خالی کرد؟ یعنی عکس رو پاک کرد؟

[Felony]

برای اینکه بدونید عکس داخل Image هست یا نه از کد زیر استفاده کنید :

if Assigned(Image1.Picture.Graphic) then
ShowMessage('Yes')
else
ShowMessage('No');

برای خالی کردن Image هم از کد زیر :
Image1.Picture.Assign(nil);

در ضمن این سوال مربوط میشه به بخش مباحث عمومی نه کامپوننت ها .

[benyaminrahimi]

view source (http://barnamenevis.org/forum/showthread.php?t=198496#viewSource)
print (http://barnamenevis.org/forum/showthread.php?t=198496#printSource)? (http://barnamenevis.org/forum/showthread.php?t=198496#about)

1.if Assigned(Image1.Picture.Graphic) then
2. ShowMessage('Yes')
3.else
4. ShowMessage('No');

اين کد رو سيستم من acsess valition ميده من گذاشتمش to try except

راستي اگي مثال خواستي هست

[Felony]

این کدی هست که شما تو برنامه نوشتید و این اصلا کدی که من در بالا نوشتم نیست !
var a : Boolean ;
begin
try
a:=true;
a:= Image1.Picture.Graphic.Empty
except
end;
if not(a) then ShowMessage('por');
end;

کد رو به این صورت تغییر بدید :

var
a : Boolean ;
begin
a:= Assigned(Image1.Picture.Graphic);
if a then
ShowMessage('Yes')
else
ShowMessage('No');
end;

موفق باشید .