Parsi Coders
minimizing the main form in delphi - نسخه قابل چاپ

+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Pascal/Delphi (http://parsicoders.com/forumdisplay.php?fid=45)
+--- موضوع: minimizing the main form in delphi (/showthread.php?tid=1320)

صفحات 1 2

RE: minimizing the main form in delphi - Amin_Mansouri - 12-25-2011

(12-25-2011، 03:28 PM)nasrinPoornejaty نوشته:
من از نمونه
HIDE
و
SHOW
استفاده کردم ، اما در یکی از فرمهای من عملیاتی انجام می شه که از تایمر استفاده می شه و وقتی من فرم را
Hide
می کنم ، عملیات آن هنوز ادامه داره یعنی کارهایی که در آن فرم انجام می شده با
hide
شدن آن فرم بسته نمیشه، حالا باید چکار کنم ؟؟؟؟؟ حتی روی
Onhide
فرم هم تایمر ها رو بستم اما خطا داد

درود
نسرین جان رویداد Hide از اسمش که پیدا هست فرم رو پنهان میکنید خاصیت نمایشی دارید ولی فرم اجراست کارشم انجام میده ولی فقط پنهان هست.
فقط کافیه با دستور زیر فرم رو Close کنید به همین راحتی !

یه نمونه کد :

کد:
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Close;
end;

end.

به امید دیدار

RE: minimizing the main form in delphi - nasrinPoornejaty - 12-26-2011

زمانیکه فرم را
CLOSE
می کنم ، و دوباره وارد اون فرم می شم خطا می دهد.برای همین از
Close
استفاده نکردم.

RE: minimizing the main form in delphi - Amin_Mansouri - 12-26-2011

(12-26-2011، 01:31 PM)nasrinPoornejaty نوشته: زمانیکه فرم را
CLOSE
می کنم ، و دوباره وارد اون فرم می شم خطا می دهد.برای همین از
Close
استفاده نکردم.

خطا نمیده
شما تو قسمت uses یونیت فرم بعدی رو اضافه کنید تا با مشکلی مواجه نشید.
یه سورس پیوست کردم نگاه کن مشکل نداره که !


دانلود :


.zip   close-Show Form Delphi.zip (اندازه 4.92 KB / تعداد دانلود: 6)

RE: minimizing the main form in delphi - nasrinPoornejaty - 12-27-2011

فایلی را که گذاشتید رو نمی تونم دانلود کنم خطا میده

RE: minimizing the main form in delphi - Amin_Mansouri - 12-27-2011

لینک سالمه
یه جا دیگه هم اپ کردم
لینک :
http://up9.iranblog.com/images/ewg2xwhh8zv82lh4pz.zip

RE: minimizing the main form in delphi - nasrinPoornejaty - 12-27-2011

ببخشید من فایل رو تونستم دانلود کنم ، اما خود برنامه مشکل داره و اجرا نمی شه .اما تا جاییکه فهمیدم اینکه تو
USEU
هر فرم اسم فرم دیگه رو بیارم.
درسته ؟؟؟؟؟؟

RE: minimizing the main form in delphi - Amin_Mansouri - 12-27-2011

(12-27-2011، 02:07 PM)nasrinPoornejaty نوشته: ببخشید من فایل رو تونستم دانلود کنم ، اما خود برنامه مشکل داره و اجرا نمی شه .اما تا جاییکه فهمیدم اینکه تو
USEU
هر فرم اسم فرم دیگه رو بیارم.
درسته ؟؟؟؟؟؟

سلام
نسرین جان من فایل رو یه جا دیگه هم براتون اپلود کردم لینک توی پست قبلی هست.

توی قسمت useu نه توی قسمت uses باید اسم یونت فرم رو بنویسید وقتی فرم 2 رو ادد میکنیم یه یونیت اضافه میشه
اگر توی قسمت uses تعریف نکنی اصلا فرم و کنترل های فرم دیگه رو نمیتونیم به هم ارتباط بدیم :

یه نمونه کد میزارم :

نقل قول:unit Unit1;

interface

uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms,unit2, Vcl.Dialogs, Vcl.StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation

{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
form2.Show;//نمایش فرم
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
form2.Close;//بستن فرم
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
Application.Terminate; //بستن برنامه
end;
end.


اینم یه عکس که بهتر متوجه بشی :

[عکس: cb55z4ucoq1opz8te8g2_thumb.jpg]