%% Identifier=DialogId
%% Caption=Please open file(s)
%% FileName=c:\daq\*.cfg
%% Filter1=Text files   (*.txt)|*.txt|
%% Filter2=Config files (*.cfg)|*.cfg|
%% Filter3=Pascal files (*.pas)|*.pas|
%% Filter4=CRW files    (*.crw)|*.crw|
%% Filter5=DAQ files    (*.daq)|*.daq|
%% Filter6=CAL files    (*.cal)|*.cal|
%% Filter7=All files    (*.*)  |*.*  |
{
Start FileOpenDialog dialog
}
if editstate=0 then begin
 if pos('?',edit('(%Caption%')
           +edit(' %FileName%')
           +edit(' %Filter1%')
           +edit(' %Filter2%')
           +edit(' %Filter3%')
           +edit(' %Filter4%')
           +edit(' %Filter5%')
           +edit(' %Filter6%')
           +edit(' %Filter7%')
           +edit(')FileOpenDialog %Identifier%'))>0
 then Warning('Error initializing FileOpenDialog %Identifier%!');
end else Warning('Cannot edit right now!');
