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: 18218

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 ...
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: 18218

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 ...
by Rael Bauer
Wed Oct 24, 2018 7:28 pm
Forum: Support
Topic: Checkpoint navigation
Replies: 9
Views: 43063

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: 11851

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 ...
by Rael Bauer
Tue Jan 13, 2015 11:47 pm
Forum: Examples, Demos
Topic: [Example] Smart indent
Replies: 7
Views: 77891

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 ...
by Rael Bauer
Sun May 18, 2008 8:49 pm
Forum: Support
Topic: "file:///" type urls don't work
Replies: 1
Views: 11755

"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 ...