FileExists function kak mojna

отредактировано 02:39 Раздел: FastReport 3.0
Privet,

u mne script takoe
....
Picture1.LoadFromFile(<Table1."FileName">);
...


Problema takaya , kogda niyeto eti risunuk otcot prikratit, a vapshi ect ili mojna dobavit funksiye FileExists

Togda ya magla pisat

If FileExists(<Table1."FileName">) then
Picture1.LoadFromFile(<Table1."FileName">) else
Picture1.LoadFromFile('C:\NoFile.jpg');

Spasibo,


Комментарии

  • LexLex
    отредактировано 02:39
    Подключи свою функцию FileExists к отчету.
    Подключение внешних функций к отчету
    подробно описано в документации.

  • dron-sdron-s Россия
    отредактировано 02:39
    написал:
    Подключение внешних функций к отчету
    подробно описано в документации.
    а лучше посмотри вот эту ветку http://www.fast-report.com/en/forum/?p=/discussion/2838 если у тебя версия фаста 3.19,если же позднее то читай руководство разработчика
  • отредактировано 02:39
    Ya izdelil funksiya,

    procedure FormCreate(Sender: TObject);
    function FindFile(Fn : String): Boolean;
    function CallMethod(Instance: TObject; ClassType: TClass; const MethodName: String ; var Params: Variant): Variant;

    ....
    Private
    ...
    ...

    function TFrm_Ana_Form.FindFile(Fn: String): Boolean;
    begin
    if FileExists(Fn) then Result:=True else Result:=False;
    end;


    procedure TFrm_Ana_Form.FormCreate(Sender: TObject);
    begin
    fsGlobalUnit.AddMethod('function FindFile(Fn : String): Boolean', CallMethod, 'MyFunc', 'This function = FileExists');
    end;


    function TFrm_Ana_Form.CallMethod(Instance: TObject; ClassType: TClass;
    const MethodName: String; var Params: Variant): Variant;
    begin
    if UpperCase(MethodName) = 'FINDFILE' then
    Result := FindFile(Params[0]);

    end;



    ...

    end.



    Na versiya 3.19.1 rabotayt a 3.19.4 ili 3.19.5 pachimota ne rabotayt,


    Spasibo




    end
  • LexLex
    отредактировано 02:39
    Изменился движок в FS 1.9
    написал:
  • отредактировано 02:39
    privet,

    Ya shital no chota ne poluchitsa

    Spasibo,



  • dron-sdron-s Россия
    отредактировано 02:39
    Burhan_ast
    читай вот эту ветку http://www.fast-report.com/en/forum/?p=/discussion/2838

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.