שלום

ניסתי במאות פורמים ואף אחד לא הצליח לעזור לי, כשאני יוצר טופס MDI [טופס אב] וכמה טפסי בן, אז כשאני מעלה את הטופס אב כל טפסי הבן עולים ביחד איתו, איך אפשר לבטל את זה?


תודה רבה.

לנואש שלום

כול טופס חדש במערכת נוצר באופן אוטומטי אם לא אומרים לו אחרת
פתח את הפרויקט גש לproject ושם לoptions
בחלון שנפתח יש שתי טבלאות
1. טפסים שנוצרים באופן אוטו' - שם נמצאים הטפסים הבעיתיים
2. שאר הטפסים במערכת
העבר כל מה שלא צריך להבצר באופן אוטו' לצד השני (מצד 1 לצד 2)

ירון

תודה תודה תודה אבל יש צרה חדשה

כשאני מנסה לזמן טופס מסוים, שהוא טופס בן מופיע שגיאה כמתואר באיור להלן:


[התמונה הבאה מגיעה מקישור שלא מתחיל ב https ולכן לא הוטמעה בדף כדי לשמור על https תקין: http://pics.sendit.co.il/pic/a52578aafa.jpg]

מה עם ליצור את הטופס לפני ההצגה ????

לדוגמא:

form2:=Tform2.Create(Self);

ורק לאחר מכן את ההצגה

Form2.ShowModal;

הערה חשובה טופס בן לא מציגים כ SHOWMODAL !!!

ציטוט:

במקור נכתב על ידי a_yaron מה עם ליצור את הטופס לפני ההצגה ???? לדוגמא: form2:=Tform2.Create(Self); ורק לאחר מכן את ההצגה Form2.ShowModal; הערה חשובה טופס בן לא מציגים כ SHOWMODAL !!!

אתה פשוט גאון מהלך !!!
תודה ענקית !!!

רק עוד שתי שאלות אחרונות.

1. כשאני סוגר טופס, הוא לא נעלם הוא פשוט "מתכווץ" למטה, איך אפשר ממש לגרום לו להעלם.
כי

form2.Close

לא עוזר, סביר להניח שזה משהו אחר עם SHOWMODAL לא תקף לטפסי בן כנראה גם זה לא.

2. כשאני מגדיל את הטופס בן, אז החלון אומנם נהיה גדול, אבל אז אני מאבד את השליטה עליו מבחינת האיקס למעלה שנעלם ואי אפשר לשחזר אותו, למשל בVB זה היה אוטמטי , הוא יוצר פשוט עוד שורה של איקס לחלון הבן. איך מסדרים את זה בדלפי.


תודה ענקית לך שוב

זה כן form2.close אבל בנוסף בארוע FormClose אתה יכול להחליט מה יבוצע בסגירה ע"י הפרמטר Action (סגירה, העלמה, כלום...)

השורה השניה של הלחצנים שנוספת בפתיחת טופס הבן היא של טופס הבן ולחיצה על הX שלה סוגרת את טופס הבן לא אמורים להעלם הלחצנים של טופס האב
ירון

אז העניין שאין את השורה השניה של הלחצנים, איך אני יכול לעשות שהיא כן תהיה.


תודה.

מה מוגדר בFormStyle של טופס הבן צריך להיות fsMDIChild

מן הסתם שככה הוא מוגדר אחרת הוא לא היה בן.

שוב תודה

ולגבי form2.Action מה אמור לבוא אחרי הAction אני לא מצליח למצוא משהו ברשימה שדומה לסגירה או העלמה.

ושוב תודה.

ה פרמטר Action הוא פרמטר בארוע FormClose של הטופס ולא פרמטר של הטופס

procedure TForm2.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action:=caFree;
or
Action:=caHide ;
or
Action:=caNone ;
or
Action:=caMinimize ;
end;

שוב פעם תודה, באמת תודה לא יודע מה הייתי עושה.


תודה תודה תודה