בית
Top.Mail.Ru Yandeks.Metrika
פורום: "בסיסים";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למטה

FastReport. frBand.Visible מצא סניפים דומים


asafr   (2001-12-04 18:11) [0]

יש דוח פרט-פרט ב- FastReport. כל DetailBend (DetailBend1, DetailBend2) משויך לסט נתונים אחר (DataSet1, DataSet2). ישנם גם שני HeaderDetail (HeaderDetail1, HeaderDetail2 - בהתאמה). יש צורך שכאשר CheckBox.Checked: = נכון / לא נכון בטופס Delphi, החלק השני של הדוח מודפס / לא מודפס בדוח (DataSet2). אני לא יכול לעשות כלום - לדעתי הכל נכון, אבל הקוד לא עובד: להקות תמיד גלויות כאשר גלוי = נכון. מה לא בסדר? מה לא לוקחים בחשבון?

procedure Tfm_Form1.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
var
DetHeader, DetData :TfrBandView;
begin

DetHeader :=TfrBandView(frElectroGroup.FindObjec("DetHeader1"));
DetData :=TfrBandView(frElectroGroup.FindObject("DetData1"));

if CheckBox.Checked=True then begin

if DetHeader<> nil then
DetHeader.Visible:=True;

if DetData<> nil then
DetData.Visible :=True;

end else begin

if DetHeader<> nil then
DetHeader.Visible:=False;

if DetData<> nil then
DetData.Visible :=False;
end;
end;



Girl   (2001-12-05 01:11) [1]

המתן למטפל באירועים OnGetValue. לא נראה, אבל ShowBand



Girl   (2001-12-05 01:13) [2]

כלומר סליחה, בהתחלה היה צורך לקרוא לגמרי. :)
אין צורך לתלות שום דבר ב- OnGetValue. פשוט השתמש ב- ShowBand במקום ב- Visible.



asafr   (2001-12-05 12:14) [3]

ילדה, תודה. אבל יש לי מזהה לא מוצהר "ShowBand". ואני לא רוצה לשנות שום דבר במקור. בתוך FR_Class.pas נוהל ShowBand רשום כפרטי. מה אתה עושה במקרה הזה?



עמודים: 1 ענף שלם

פורום: "בסיסים";
ארכיון נוכחי: 2002.01.08;
הורדה: [xml.tar.bz2];

למעלה





זיכרון: 0.55 MB
זמן: 0.034 c
1-22191
stalker_boss
2001-12-16 02:50
2002.01.08
נשמע


3-21953
וריק
2001-12-05 15:14
2002.01.08
אודות רשומות


4-22458
אייאקס
2001-10-31 17:50
2002.01.08
TColor ו- RGB


3-21978
עובד אנונימי
2001-12-04 20:25
2002.01.08
ADO + Excel + Delphi5


4-22494
Garryfv
2001-11-05 12:35
2002.01.08
הדפסה גרפית קשה





אפריקאנס אלבני ערבי אַרְמֶנִי אזרביג'אן הבסקים בלארוסית בולגרי קטלאנית הסיני (פשוט) סינית (מסורתית) קרואטית צ'כיה דני הולנדי אנגלית אסטוני פיליפיני פיני צרפתית
גליציה גאורגיה גרמני יווני קריאולית האיטית עברי הינדי הונגרי איסלנדי אינדונזי אירי איטלקי יפני קוריאני לטבי ליטאי מקדוניה מלאית מלטזית נורבגי
פרסי פולני פורטוגזי רומנית רוסי סרבית סלובקי סלובני ספרדי סוואהילית שבדי תאילנדי תורכי אוקראיני אורדו ויאטנמית וולשית יידיש בנגלית בוסנית
קבואנו אספרנטו גוג'ראטית האוסה המונג איגבו יָאוָנִי קנאדה לחמר לאו הלטינית מאורים מרתי מונגולי נפאלית פונג'בית סומליה טמילית טלוגו יורובה
זולו
Английский Французский Немецкий Итальянский Португальский Русский Испанский