پر یا خالی بودن عکس

[Batman]

با سلام
ببخشید که عنوان بهتری به ذهنم نرسید
چجوری میشه فهمید که یه image عکس داره یا نه مثل اینکه یه edit خالیه یا پر
ممنونم

[persianboy]

ممکن مسخره به نظر بیاد ، ولی اینم یه راه حله :


procedure TForm1.Button1Click(Sender: TObject);
begin
deletefile('c:\a.jpg');
image1.Picture.SaveToFile('c:\a.jpg');
if fileexists('c:\a.jpg') then
showmessage('Por')
else
showmessage('Khali');
deletefile('c:\a.jpg');
end;

[Batman]

با سلام
دوست عزیز منظورم اصلا این نیست
ببین توی یه صفحه چک میشه که اگر عکس وارد شده بود به صفحه بعد بره اگر نه پیغام بده

[Hamid_PaK]

با سلام
ببخشید که عنوان بهتری به ذهنم نرسید
چجوری میشه فهمید که یه image عکس داره یا نه مثل اینکه یه edit خالیه یا پر
ممنونم
توضیحات گنگ است ، دقیقا چی کار می خواهید انجام دهید ؟

یا حق ...

[Batman]

با سلام
ببینید آقا حمید فکر نکنم مبهم باشه
من توی برنامم از notebook استفاده کردم
توی قسمت ثبت نام باید عکس طرف هم درج بشه
حالا میخوام بدونم که چجوری میشه چک کرد که عکس توی image هست یا نه که به مرحله بعدی بره یا نه
ممنونم

[Hadizadeh]

وقتی عکس تو تصویر نباشه، Image1.Picture.Bitmap.Width و Image1.Picture.Bitmap.Height هر دو صفر هستند. ویا Picture=nil هست.

[persianboy]

اینی که منم هم گفتم همون کارو انجام میده فکر کنم :
اول دکمه check رو بزن میگه خالیه و بعد load رو بزن و پرش کن ، حالا چک رو بزن ، میگه پره .
البته اگه منظورتو درست فهمیده باشم .

[Batman]

نه دوست عزیز برنامه رو دیدم
کلک رشتی قبول نیست
چون این کار توی درایو c فایل اضافه تولید میکنه و با مقدار بالا هم تعداد فایلها زیاد میشه
بهر حال ممنون
منتظر نظر بقیه دوستان هم هستم

[Valadi]

قبل از ایجاد جستجو کن

Form1.Image1.Picture.Bitmap.Empty;

[Batman]

با سلام
جناب valadi کد شما رو قبلا هم امتحان کردم در هر دو صورت پر و خالی 1- میده و در ضمن بعدش هم image رو خالی میکنه

[persianboy]

با توجه به توضیحاتی که درباره برنامت دادی ، هر دفعه فقط یه عکس رو چک میکنه . اگه درست فهمیده باشم ، برنامت باید یه نفر یه نفر به لیست notebook اضافه کنه دیگه که در این صورت هر دفعه یه image رو چک میکنه ( دو تا فرم اضافه کردن اطلاعات که نداری ، درسته ؟) پس هر وقت
که میخواد یه نفر رو اضافه کنه یه فایل اضافه میکنه و بعد چک کردن پاکش میکنه دیگه . پس در این
صورت فکر نمیکنم مشکلی از لحاظ فضای خالی هارد و تعداد زیاد فایل ها پیش بیاد .(چون برنامه
من یه فایل ، اونم با نام a.jpg که بیشتر تولید نمیکنه . نمیشه که دو تا فایل هم نام تو یه مسیر
درست کرد . میشه ؟ پس این حرفه شما رد میشه :

و با مقدار بالا هم تعداد فایلها زیاد میشه
در ضمن هر فایلی که تولید کنه ، پاکشم میکنه :

این کار توی درایو c فایل اضافه تولید میکنه
پس بعد از چک کردن ، هیچ فایلی تو درایو c نمیمونه .
اگه منظورتونو متوجه نشدم ، بگین .

[Batman]

اینم کد نهایی

if image1.pictrue.graphic=nil then ...
البته باز هم با تشکر از جناب هادیزاده و بقیه دوستان