FiveTech Software tech support forums

... that "commdlg_FindReplace" also work with RTF Problem : Fivewin have "only" CLASS TDlgFind ( c:\fwh\source\classes\dlgfind.prg ) --- have "begin" to re-write HMG for FiveWin to REDIFEINE "commdlg_FindReplace" FUNCTION DlgFindReplace( cFind, ...

// C:\FWH...\SAMPLES\DLGFIND2.PRG Para FWH22.06 o Superior. By Jimmy.// Class TDlgFind test#Include "FiveWin.ch"FUNCTION Main()   LOCAL oWnd, oGet, cMemo := "This is a test in GET"   LOCAL bSearch, cFind := "test"        ...

hi, here working CODE // Class TDlgFind test#include "FiveWin.ch"function Main()   local oWnd, oGet, cMemo := "This is a test in GET"   local bSearch, cFind := "test"                      // add this   DEFINE WINDOW oWnd   @ 2, 2 GET oGet VAR cMemo SIZE 200, 25 ...

... change ID while it is from Windows ;) i use that "search/replace" Dialog which e.g. Notepad.EXE have based on c:\fwh\source\classes\dlgfind.prg i found out that i can REDEFINE "Windows standard Common Dialog" it have to do with (undocumented) Function RegDialog() as i want ...

hi, have look into c:\fwh\source\classes\dlgfind.prg and found REDEFINE / ACTION ... hm ... :idea: have made a copy and change into   //    RegDialog( ::hWnd := FindText( cText, oWnd:hWnd, @nFindMsgString ) )   RegDialog( ::hWnd := FindReplaceDlg( ...

Look, c:\fwh..\samples\fivedit.prg

Regards, saludos.

... from: => NUMTOHEX( 0 ) Called from: .\source\function\VALBLANK.PRG => FW_CLRTOHTML( 318 ) Called from: .\source\classes\DIALOG.PRG => TDLGFIND:HTML( 421 ) Called from: .\source\classes\DIALOG.PRG => TDLGFIND:INITIATE( 955 ) Called from: .\source\classes\DLGFIND.PRG => TDLGFIND:NEW( ...

... referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|MGET Error: Unresolved external '_HB_FUN_FINDTEXT' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|DLGFIND Error: Unresolved external '_HB_FUN_GETWINTXTLENGHT' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|MGET Error: Unresolved external '_HB_FUN_MGETREPLACE' ...

... = [Source\Classes\dde.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\dialog.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\dlgfind.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\edit.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\fget.prg] MYC_FLAGS ...

Silvio,

We are focused on publishing FWH 16.04

Once it gets published I will try to help you with your requirement

or U can add a method or parameter on Tdlgfind to call FINDREPLACE()

local oDlg := TDlgFind():New( cText, oWnd, bSearch ,lreplace,ctexxtreplace)

just an idea...

but the dialog findreplace must have another parameter .. ctext ..ctextoreplace

Silvio,

It seems as it is the same resource as we use in source\winapi\findtext.c

#define FINDMSGSTRING L"commdlg_FindReplace"

ad dlg find how I can make to have also the dialog replace native of windows ?
I saw there is hb_regexReplace

... "Obj\control.obj" "Obj\cursor.obj" "Obj\database.obj" "Obj\dde.obj" "Obj\dialog.obj" "Obj\dlgfind.obj" "Obj\edit.obj" "Obj\fget.obj" "Obj\fline.obj" "Obj\folder.obj" "Obj\font.obj" "Obj\group.obj" ...