From: Robert M. <mar...@us...> - 2004-02-05 07:29:22
|
Update of /cvsroot/jvcl/dev/JVCL3/examples/JvCreateProcess In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28467/JVCL3/examples/JvCreateProcess Modified Files: CreateProcessExample.dof CreateProcessExampleMainFormU.dfm CreateProcessExampleMainFormU.pas Log Message: improved examples Index: CreateProcessExampleMainFormU.pas =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/examples/JvCreateProcess/CreateProcessExampleMainFormU.pas,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** CreateProcessExampleMainFormU.pas 18 Jan 2004 10:53:53 -0000 1.4 --- CreateProcessExampleMainFormU.pas 5 Feb 2004 07:26:51 -0000 1.5 *************** *** 51,55 **** procedure StopBtnClick(Sender: TObject); public ! procedure AddLogMsg(const Text: String); procedure UpdateButtons; end; --- 51,55 ---- procedure StopBtnClick(Sender: TObject); public ! procedure AddLogMsg(const Text: string); procedure UpdateButtons; end; *************** *** 66,70 **** sProcessTerminated = 'Process "%s" terminated, ExitCode: %.8x'; ! procedure TCreateProcessExampleMainForm.AddLogMsg(const Text: String); begin RichEdit1.Lines.Add(FormatDateTime('DD.MM.YYYY HH:NN:SS ', Now) + Text); --- 66,70 ---- sProcessTerminated = 'Process "%s" terminated, ExitCode: %.8x'; ! procedure TCreateProcessExampleMainForm.AddLogMsg(const Text: string); begin RichEdit1.Lines.Add(FormatDateTime('DD.MM.YYYY HH:NN:SS ', Now) + Text); *************** *** 120,121 **** --- 120,122 ---- end. + Index: CreateProcessExampleMainFormU.dfm =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/examples/JvCreateProcess/CreateProcessExampleMainFormU.dfm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** CreateProcessExampleMainFormU.dfm 23 Aug 2003 23:18:24 -0000 1.1 --- CreateProcessExampleMainFormU.dfm 5 Feb 2004 07:26:51 -0000 1.2 *************** *** 6,9 **** --- 6,11 ---- Caption = 'TJvCreateProcess example (with notepad.exe)' Color = clBtnFace + Constraints.MinHeight = 100 + Constraints.MinWidth = 505 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText *************** *** 11,14 **** --- 13,17 ---- Font.Name = 'MS Sans Serif' Font.Style = [] + FormStyle = fsStayOnTop OldCreateOrder = False OnCreate = FormCreate *************** *** 72,76 **** Top = 41 Width = 536 ! Height = 309 Align = alClient Font.Charset = EASTEUROPE_CHARSET --- 75,79 ---- Top = 41 Width = 536 ! Height = 304 Align = alClient Font.Charset = EASTEUROPE_CHARSET Index: CreateProcessExample.dof =================================================================== RCS file: /cvsroot/jvcl/dev/JVCL3/examples/JvCreateProcess/CreateProcessExample.dof,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** CreateProcessExample.dof 1 Feb 2004 12:25:45 -0000 1.3 --- CreateProcessExample.dof 5 Feb 2004 07:26:51 -0000 1.4 *************** *** 4,8 **** UnsafeCast=0 [Directories] ! OutputDir=..\..\..\bin ! UnitOutputDir=..\..\..\dcu SearchPath=..\..\..\run;..\..\..\common --- 4,8 ---- UnsafeCast=0 [Directories] ! OutputDir=..\..\bin ! UnitOutputDir=..\..\dcu SearchPath=..\..\..\run;..\..\..\common |