> > You mean "in current file", not "in current directory", do you? > > Oh, yes.. a lot of errors from me... > > > And yes, it is logical to replace all only in the current file. Think > > about renaming a private class variable, for example. > > I think you misunderstand what I meant... > This is what I mean (look also at attachment): > > Public Sub btnReplaceAll_Click() > > If InitSearch() Then Return > > If chkCurrentFile.Value = True Then > > If Message.Question(Subst$(("Are you sure you want to replace all > instances in this file of '&1' with '&2'?"), SearchString, > ReplaceString),("Yes"), ("No")) <> 1 Then Return > > Run(GO_FORWARD + DO_REPLACE + DO_ALL) > Else > > If Message.Question(Subst$(("Are you sure you want to replace all > instances of '&1' with '&2'?"), SearchString, ReplaceString),("Yes"), > ("No")) <> 1 Then Return > > Browse(chkSourceOnly.Value, True) > Endif > > End > > Just testing it for errors... not my best day for me to concentrate. > > > Jussi
I think what I have done in revision #3772 is a bit more practical. Tell me! -- Benoît Minisini ------------------------------------------------------------------------------ Benefiting from Server Virtualization: Beyond Initial Workload Consolidation -- Increasing the use of server virtualization is a top priority.Virtualization can reduce costs, simplify management, and improve application availability and disaster protection. Learn more about boosting the value of server virtualization. http://p.sf.net/sfu/vmware-sfdev2dev _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user