Search found 6 matches

by Rael Bauer
Tue Jun 04, 2019 6:50 pm
Forum: Support
Topic: TFindDialog does not work via keyboard in Delphi Tokyo
Replies: 3
Views: 3183

Re: TFindDialog does not work via keyboard in Delphi Tokyo

Yes, this has nothing to do with Richview really. Anyway, after more investigation I am able to isolate the problem. In a simple test project if I set the Appearance to Windows10 (not default of Windows), then the problem occurs. https://www.bauerapps.com/dev/find_dialog_test.zip Are you able to rep...
by Rael Bauer
Tue Jun 04, 2019 11:29 am
Forum: Support
Topic: TFindDialog does not work via keyboard in Delphi Tokyo
Replies: 3
Views: 3183

TFindDialog does not work via keyboard in Delphi Tokyo

Hello, I'm wondering if anyone out there has experienced this problem. If I compile ActionTestUni under Delphi XE4, I do not get this problem. However when I compile it under Delphi Tokyo, the FindDialog does not show accelerator keys, and it also does not respond to normal keyboard events such a EN...
by Rael Bauer
Wed Oct 24, 2018 7:28 pm
Forum: Support
Topic: Checkpoint navigation
Replies: 9
Views: 12314

Re: Checkpoint navigation

Hi,

The above ScrollToCheckpoint routine will bring the checkpoint into view, sometimes at the bottom of the visible area. How can I make ScrollToCheckpoint bring the checkpoint to the middle of the visible area?

Thanks
Rael
by Rael Bauer
Sun Oct 14, 2018 2:17 pm
Forum: Support
Topic: Remove "nearest" checkpoint
Replies: 1
Views: 2162

Remove "nearest" checkpoint

Hi, I want to remove the "nearest" checkpoint - meaning the nearest checkpoint going "backwards", but not beyond the current paragraph. function TForm1.CheckPointNumber(rve: TCustomRichViewEdit): Integer; var i: Integer; begin Result := -1; rve := rve.TopLevelEditor; i := rve.CurItemNo; while not rv...
by Rael Bauer
Tue Jan 13, 2015 11:47 pm
Forum: Examples, Demos
Topic: [Example] Smart indent
Replies: 7
Views: 40066

Sorry, I cannot reproduce this problem. I added TForm3.ChangeFirstIndentConversion and the code procedure TForm3.RichViewEdit1KeyPress(Sender: TObject; var Key: Char); var step: Integer; begin if Key=#9 then begin step := 48; if GetAsyncKeyState(VK_SHIFT)and$8000<>0 then step := -step; if ChangeInd...
by Rael Bauer
Sun May 18, 2008 8:49 pm
Forum: Support
Topic: "file:///" type urls don't work
Replies: 1
Views: 4442

"file:///" type urls don't work

Hi, I have a user who says that "file:///" type hyperlinks don't work for him. "http://" hyperlinks work fine, but for "file:///" type he says that the computer churns but then does nothing. He's on win2003 and has been experiencing this with simple RichViewActions demo. Any ideas of cause/ how to s...