dynamo
Members-
Posts
35 -
Joined
-
Last visited
-
Days Won
2
dynamo last won the day on October 8 2022
dynamo had the most liked content!
Recent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
dynamo's Achievements
Newbie (1/4)
2
Reputation
-
uniguinin ilk versiyolarında derlendi.yeni versiyonda çalışıp çalışmadığını test etmedim. dosya ekte. Project1rpt.rar
-
burda http://forums.unigui.com/index.php?/topic/2294-fastreport-print-preview-on-web/ hem DESKTOP hem WEB ortamında çalışan eşsiz bir örnek bulabilirsin.
-
I have the same problem.Can anybody help us?
-
Soruyu tam anlamadım.DDBGrid->Columns'a eklediğin alan adlarını(sütun) Columns editörden istemedin alan adını ya sil yada Visible:=false yap.
-
Stas, Thank you very much. DialogPage1 removed Fast Report design page and problem solved.
-
I get error FastReport print on web: The error caused by the following line: frmFRDataModule.frxReport1.LoadFromFile(s); procedure TMainForm.UniBitBtn1Click(Sender: TObject); var s,fn:string; FormUrlView1: TFormUrlView; begin s:= ExtractFilePath(Application.ExeName) + 'report\customer.fr3' ; if WebMode then begin fn:= 'R-' +FormatDateTime('hhmmss.zzz', Now()) +'.pdf'; // Create a unique name for report. frmFRDataModule.frxReport1.PrintOptions.ShowDialog := False; frmFRDataModule.frxReport1.ShowProgress:=false; frmFRDataModule.frxReport1.PrintOptions.ShowDialog:=false; frmFRDataModule.frxReport1.EngineOptions.SilentMode:=True; frmFRDataModule.frxReport1.EngineOptions.EnableThreadSafe := True; frmFRDataModule.frxReport1.EngineOptions.DestroyForms := False; frmFRDataModule.frxPDFExport1.Background:=True; frmFRDataModule.frxPDFExport1.ShowProgress:=False; frmFRDataModule.frxPDFExport1.ShowDialog:=False; frmFRDataModule.frxPDFExport1.FileName := UniServerModule.LocalCachePath + fn; frmFRDataModule.frxPDFExport1.DefaultPath := ''; frmFRDataModule.frxDBDataset1.DataSet:=ADOQuery1; frmFRDataModule.frxReport1.DataSet:=frmFRDataModule.frxDBDataset1; frmFRDataModule.frxReport1.PreviewOptions.AllowEdit:=False; frmFRDataModule.frxReport1.LoadFromFile(s); frmFRDataModule.frxReport1.PrepareReport(); // Create Report frmFRDataModule.frxReport1.Export(frmFRDataModule.frxPDFExport1); // Export Report FormUrlView1:=TFormUrlView.Create(UniApplication); FormUrlView1.URLFrame.URL := UniServerModule.LocalCacheURL + fn; // Displayed on UniURLFrame FormUrlView1.Show; end else begin frmFRDataModule.frxReport1.Clear; frmFRDataModule.frxDBDataset1.DataSet:=ADOQuery1; frmFRDataModule.frxReport1.DataSet:=frmFRDataModule.frxDBDataset1; frmFRDataModule.frxReport1.LoadFromFile(s); frmFRDataModule.frxPDFExport1.EmbeddedFonts:=True; frmFRDataModule.frxReport1.ShowReport; end; end; What should I do ? Project1.rar
-
thanks.Using MessageDlg ,UniEdit1.Text gets value of "YES" or "NO" but I have a problem this: (on WEB MODE) Look at the following code: procedure TMainForm.UniBitBtn1Click(Sender: TObject); begin //--------is running----------------------------- MainForm.caption:=''; UniEdit1.Clear; MessageDlg('Are you delete this record?', mtConfirmation, mbYesNo, procedure(AResult: Integer) begin case AResult of mrYes: UniEdit1.Text := 'YES'; mrNo : UniEdit1.Text := 'NO'; end; end); //--------------------------------------------- //--------------is not running------?????????????????????? if UniEdit1.Text='YES' then begin MainForm.caption:='aaa'; end; //----------------------------------?????????????????????? end;
-
MessageDlg is running on DESKTOP but is not running on WEB.You can test sample Dialogs: uniButton5 ->Confirm:
-
MessageBox function is running on localhost but not running on server. or Can I use a useful function rather than MessageBox ,so it have to run without problem on DESKTOP and WEB. procedure TuniForm4.UniBitBtn4Click(Sender: TObject); begin if MessageBox(0,'Are you delete this record...?','WARNING',MB_YESNO)=ID_NO then exit; ///------------ //------------- end; this code under WEB MODE http://localhost:8077/ ---> is running http://server:8077/ ---> is not running and gives the following error (attach file):
-
Thank you very much Farshad, now it is ok.
-
project was created by choosing "VCL Application/StandAlone Server/ISAPI Module".In The project, first line is commented. When I build the project2 with Delphi XE2 ide Project -> Build Projectisapi2 , it doesn't consist of Projectisapi2.dll ,it create Projectisapi2.exe in Win32/Debug. What should I do? //{$define UNIGUI_VCL} // Comment out this line to turn this project into an ISAPI module' {$ifndef UNIGUI_VCL} library {$else} program {$endif} Projectisapi2; uses uniGUIISAPI, Forms, ServerModule in 'ServerModule.pas' {UniServerModule: TUniGUIServerModule}, MainModule in 'MainModule.pas' {UniMainModule: TUniGUIMainModule}, Main in 'Main.pas' {MainForm: TUniForm}; {$R *.res} {$ifndef UNIGUI_VCL} exports GetExtensionVersion, HttpExtensionProc, TerminateExtension; {$endif} begin {$ifdef UNIGUI_VCL} Application.Initialize; TUniServerModule.Create(Application); Application.Run; {$endif} end.
-
A perfect sample. Thanks Farshad.
-
Very thanks irwan.I modified this sample with (Delphi XE2 + MyDac7 ). Creating-WebApp-Using-uniGUI-MyDac-MySQL.rar
-
Do not display the title bar of each form in WEB MODE.In DESKTOP MODE I can do TuniForm's BorderStyle=bsNone.But in WEB MODE what can I do? Can you give an example? Thanks for the reply.
-
I can not compiled with Delphi XE2.When I compiling SivakSQLite3.dpk in IDE, it gives following error: AjaxSqlite\sivak3\sql3_utils.pas(220,28): warning W1057: W1057 Implicit string cast from 'AnsiString' to 'string' AjaxSqlite\sivak3\sql3_utils.pas(227,31): warning W1057: W1057 Implicit string cast from 'AnsiString' to 'string' AjaxSqlite\sivak3\sql3_defs.pas(441,1): error E2037: E2037 Declaration of 'FreeRecordBuffer' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(442,1): error E2037: E2037 Declaration of 'ClearCalcFields' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(446,1): error E2138: E2137 Method 'GetBookmarkData' not found in base class AjaxSqlite\sivak3\sql3_defs.pas(447,1): error E2037: E2037 Declaration of 'SetBookmarkFlag' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(448,1): error E2138: E2137 Method 'SetBookmarkData' not found in base class AjaxSqlite\sivak3\sql3_defs.pas(462,1): error E2037: E2037 Declaration of 'InternalInitRecord' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(465,1): error E2037: E2037 Declaration of 'InternalSetToRecord' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(467,1): error E2037: E2037 Declaration of 'AllocRecordBuffer' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(471,1): error E2037: E2037 Declaration of 'GetBookmarkFlag' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(472,1): error E2037: E2037 Declaration of 'GetRecord' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(490,1): error E2037: E2037 Declaration of 'GetCurrentRecord' differs from previous declaration AjaxSqlite\sivak3\sql3_defs.pas(686,18): error F2063: F2063 Could not compile used unit 'sql3_utils.pas'