On Sun, 18 Aug 2019 14:21:30 +0200, Martin Frb via lazarus <lazarus@lists.lazarus-ide.org> wrote:
>If you want to go on trying to see if we can find anything, then please >open > components\macroscript\emscriptclasses.pas >around line 555 >replace TEmsSynWrapper.EMS_SearchReplace >with: > >function TEmsSynWrapper.EMS_SearchReplace(ASearch, AReplace: string; > AOptions: TSynSearchOptions): integer; >begin >debugln(['*** EMS_SearchReplace ASearch ', ord(ssoReplaceAll), ' / ', >integer([ssoReplaceAll])]); >debugln(['*** EMS_SearchReplace ', Pointer(ASearch), ' / ', >Pointer(AReplace), ' / ', integer(AOptions), ' / ', Pointer(self)]); >debugln(['*** EMS_SearchReplace ASearch ', ASearch, ' / ', AReplace]); >debugln(['*** EMS_SearchReplace ASearch ', length(ASearch), ' / ', >length(AReplace)]); >debugln(['*** EMS_SearchReplace ASearch ', RawByteString(ASearch), ' / >', RawByteString(AReplace)]); >debugln(['*** EMS_SearchReplace ASearch ', StringCodePage((ASearch)), ' >/ ', StringCodePage((AReplace))]); >debugln(['*** EMS_SearchReplace ASearch ', >StringCodePage(RawByteString(ASearch)), ' / ', >StringCodePage(RawByteString(AReplace))]); >debugln(['*** EMS_SearchReplace ASearch ', self.Text, ' / ', >dbgs(CaretXY)]); > Result := SearchReplace(ASearch, AReplace, AOptions); >debugln(['*** EMS_SearchReplace ASearch ', Result]); >debugln(['*** EMS_SearchReplace ASearch ', self.Text, ' / ', >dbgs(CaretXY)]); >end; > >Start lazarus from console, so you can get the output. Copy the output. >The output only matters, if the error occurs. So self-testing must be >re-enabled. I have done this on my RPi4 with Lazarus 2.0.4. The result after enabling the test and starting again from the console is this sequence (line breaks added by news reader): pi@rpi4-test:~ $ /home/pi/dev/lazarus/2.0.4/startlazarus --pcp=/home/pi/.lazarus_2.0.4 Adding "--pcp=/home/pi/.lazarus_2.0.4" as a parameter is a file SetPrimaryConfigPath NewValue="/home/pi/.lazarus_2.0.4" -> "/home/pi/.lazarus_2.0.4" TLazarusManager.Run starting /home/pi/dev/lazarus/2.0.4/lazarus ... SetPrimaryConfigPath NewValue="/home/pi/.lazarus_2.0.4" -> "/home/pi/.lazarus_2.0.4" Hint: (lazarus) [TMainIDE.ParseCmdLineOptions] PrimaryConfigPath="/home/pi/.lazarus_2.0.4" Hint: (lazarus) [TMainIDE.ParseCmdLineOptions] SecondaryConfigPath="/etc/lazarus" Hint: (lazarus) [TBuildManager.SetBuildTarget] Old=arm-linux-gtk2 New=arm-linux-gtk2 Changed: OS/CPU=True LCL=False Parameter type not implemented! ---Here the error message is shown and it waits for the Start IDE button to be clicked. ----- [WARNING] SetImageList called without handle for lbMacroView(TListView) [WARNING] SetImageList called without handle for lbMacroView(TListView) [WARNING] SetImageList called without handle for lbMacroView(TListView) --- Here is where the IDE has started and can be used --- --- Now close the Lazarus IDE --- LAZARUS END - cleaning up ... Hint: (lazarus) [TMainIDE.Destroy] B -> inherited Destroy... TMainIDE Hint: (lazarus) [TMainIDE.Destroy] END --- Lazarus IDE closed --- I just copied the command line found in the GUI menu and ran it inside the terminal, except I removed the trailing %f since I had no file to pass in. -- Bo Berglund Developer in Sweden -- _______________________________________________ lazarus mailing list lazarus@lists.lazarus-ide.org https://lists.lazarus-ide.org/listinfo/lazarus
