-=Den=-
-=Den=-
Подробная информация
- Имя пользователя
- -=Den=-
- Электронная почта
- Присоединился
- Посещений
- 37
- Был на сайте
- Группы
- FR Team
Комментарии
-
1) Деструктор классу TFunctions не нужен. 2) finalization Functions.Free; - тоже не нужно. 3) Переменные Functions: TFunctions; Script: TfsScript; -не нужны. 4) в initialization должно быть только fsRTTIModules.Add(TFunctions); создавать объект н…
-
Попробуйте не заполнять поля Login и Password.
-
Вот маленький пример не имеющий отношения к FR, если скомпилировать под d6 - работать не будет(с включенными XP темами), а если под D7 то работает.
-
Скомпилировал в D7 main demo (без XPManifest ), создал FRDemo.exe.manifest. Проверил тулбары работают(перемещал, пробовал кнопки). Если неужно могу выслать скомпилированое демо.
-
Глюк с кнопками тулбара можно повторить на простом примере и без FR. В D7 для "обхода" этого глюка есть компонент XPManifest если его бросить на форму, то все работает(Main demo не содержит этого компонента).
-
Если закоментировать скрипт, то подотчет будет разрыватся.
-
Вот он.
-
Перенос subreport целиком на новую страницу(без разрыва) можно сделать только с помощью скрипта. Есть подобный пример отчета(если нужно могу выложить), в нем на subreport'e masterdata и detail.
-
Как это сделать описано в документации.
-
Да. with FindClass('TEdit') do begin ... //добавление событий как описано в доке ... ... end;
-
Добавляйте frxDBDataset1 к отчету с помощью frxReport1.DataSets.Add(frxDBDataset1);
-
Попробйте так (Delphi): var Params:Variant; begin fsScript1.AddRTTI; fsScript1.Compile; Params := VarArrayCreate([0,0],varVariant); fsScript1.CallFunction1('Test',Params); if Params[0] = True then ShowMessage('True'); end;
-
У страници на которой расположены бэнды отключите св-во TitleBeforeHeader.
-
в fs_idisp.pas функция TfsOLEHelper.DispatchInvoke : в объявление переменных добавить: var ExcepMess: WideString; вместо: if Status <> 0 then raise Exception.Create('OLE error ' + IntToHex(Status, 8) + ': ' + Name); поставить : if …
-
Где вы вызываете функцию ?
-
Можно использовать функцию frxReport1->PreviewPages->ObjectOver().
-
Page[0] можно заменить на Page[frxReport1->PreviewPages->CurPage], чтобы объект создавался на текущей странице.
-
3D Bob написал: А возможно ли добавить обект в Превью, а не в главный Report, раз уже отчет для Превью строится заново. То есть обойти Report из которого загружаются старые данные, забыть о нем? Да, возможно. void __fastcall TForm1::frxRep…
-
написал: Вопрос Намбер два. После Report->PrepareReport() Значения возвращаются. С чем это связано и как этого избежать? Отчет строится заново и заначения будут браться либо из базы либо из XML файла отчета. написал: Думаю знаю в …
-
3D Bob написал: Хочу сделать РанТайм редактирование отчета. Подумал насчет того что можно сделать клик на превью и определить на каком именно элементе, например TfrxMemoview был сделать клик... И получить на него указатель. Скажите возможно ли эт…
-
3D Bob написал: Имейте совесть) Программируйте на С++ а не на С. Эх вы FR Team, так не безопасно делаете:-( TfrxMemoView * Memo1 = dynamic_cast(frxReport1->FindObject("Memo1")); Если хотите привети "Безапасныи код", то приводите его п…
-
TfrxMemoView * Memo1; Memo1 = (TfrxMemoView *)frxReport1->FindObject("Memo1");
-
написал: у меня не качается. У меня скачался. Попробуйте так: with Chart1.SeriesData[0] do begin DataType := dtFixedData; XSource := 'Jan;Feb;Mar;Apr'; YSource := '31;28;30;25'; end;
-
ftp://ftpd.borland.com/devsupport/delphi/d6/D6_upd1_ent.exe - 28,0 МБ ftp://ftpd.borland.com/devsupport/delphi/d6/D6_upd2_ent.exe - 33,2 МБ
-
написал: Перед установкой FR 3.20 я установил три Update: 1) D6_RTL1_ent.exe 2) D6_RTL2_ENT.exe 3) d6_rtl3.zip Должны стоять эти апдейты: 1)D6_upd1_ent 2)D6_upd2_ent
-
Предыдущий пост можно игнорировать, работать этот бред и не должен Пока это можно сделать только через дополнительные переменные: var v,v1,v2:variant; begin V := VarArrayCreate([0 ,1], varVariant); V[0] := VarArrayCreate([1, 8], varVariant)…
-
А, так: var v,v1,v2:variant; begin V := VarArrayCreate([0 ,1], varVariant); V[0] := VarArrayCreate([1, 8], varVariant); v[1] := VarArrayCreate([1, 6], varVariant); v[0,1] := 1; v[0,2] := 2; v[0,3] := 3; v[0,4] := 4; v[0,5] := 5; v[0,6] :…
-
1) var rich:TfrRichView; band:TfrBand; begin Band := TfrBand(frReport1.FindObject('MasterData1')); if Band <> nil then begin Band.Stretched := True; rich := TfrRichView(frCreateObject(gtAddIn,'TfrRichView')); rich.CreateUniqueName; …