12 12 schreef:
* Marc Santhoff [EMAIL PROTECTED] [Thu, 01 Nov 2007 22:19:44 +0100]:
Am Donnerstag, den 01.11.2007, 17:03 +0300 schrieb 12 12:
Is there any cross-platform way to implement subj?
Suppose I need from Form2 to add some letter into TEdit which placed
on
Form1.
Except of WinAPI's
On Fri, 02 Nov 2007 10:57:08 +0300
12 12 [EMAIL PROTECTED] wrote:
I just have learned it is possible to set
Form1.Keypreview := true;
Then call from Form2
Form1.FormKeyPress( Self, Key );
Now i think how to assign this 'Key' to
Form1.ActiveControl.
I obtained TWinControl class
-
De: 12 12 [mailto:[EMAIL PROTECTED]
Enviado el: Jueves, 01 de Noviembre de 2007 11:18 a.m.
Para: lazarus@miraclec.com
Asunto: RE: [lazarus] Emulate keyboard input like Windows Screen Keyboard
* Sergio Samayoa [EMAIL PROTECTED] [Thu, 1 Nov 2007 08:52:21
-0600]:
Then is very easy:
Control
input like Windows Screen Keyboard
* Sergio Samayoa [EMAIL PROTECTED] [Fri, 2 Nov 2007 08:11:33
-0600]:
Deleting symbol in current position is also easy, just set SelStart,
SelLength and clear SelText.
But if you want do to the hard way, which involves writing platform
specific
code, be my
* Sergio Samayoa [EMAIL PROTECTED] [Fri, 2 Nov 2007 08:11:33
-0600]:
Deleting symbol in current position is also easy, just set SelStart,
SelLength and clear SelText.
But if you want do to the hard way, which involves writing platform
specific
code, be my guest. You asked for cross platform
Isn't really impossible to use LCL-only tools?
I don't need to send key events to another application,
only to another form or control of the same app!
I just have learned it is possible to set
Form1.Keypreview := true;
Then call from Form2
Form1.FormKeyPress( Self, Key );
Now i think how to
I just have learned it is possible to set
Form1.Keypreview := true;
Then call from Form2
Form1.FormKeyPress( Self, Key );
Now i think how to assign this 'Key' to
Form1.ActiveControl.
I obtained TWinControl class has the following public:
procedure KeyDown(var Key: Word; Shift: TShiftState);
Is there any cross-platform way to implement subj?
Suppose I need from Form2 to add some letter into TEdit which placed on
Form1.
Except of WinAPI's SendInput.
--
12 12 aka skywriter
_
To unsubscribe: mail [EMAIL PROTECTED]
* Sergio Samayoa [EMAIL PROTECTED] [Thu, 1 Nov 2007 08:14:12
-0600]:
Do you have access to Form1 instance?
Ex:
Unit unit2;
...
Type
Form2 = class(TForm)
...
End;
Implementation
Uses unit1;
...
Procedure ...
Begin
...
Form1.Edit1.SelText := SomeVariable;
...
End;
Yes, i have
: [lazarus] Emulate keyboard input like Windows Screen Keyboard
* Sergio Samayoa [EMAIL PROTECTED] [Thu, 1 Nov 2007 08:14:12
-0600]:
Do you have access to Form1 instance?
Ex:
Unit unit2;
...
Type
Form2 = class(TForm)
...
End;
Implementation
Uses unit1;
...
Procedure ...
Begin
* Sergio Samayoa [EMAIL PROTECTED] [Thu, 1 Nov 2007 08:52:21
-0600]:
Then is very easy:
Control := Screen.ActiveControl;
if (Control is TCustomEdit) then
TCustomEdit(Control).SelText := SomeVariable;
What about adding or deleting a symbol at current cursor position?
I think parsing of
Am Donnerstag, den 01.11.2007, 17:03 +0300 schrieb 12 12:
Is there any cross-platform way to implement subj?
Suppose I need from Form2 to add some letter into TEdit which placed on
Form1.
Except of WinAPI's SendInput.
At least for all X Windows platforms you can use the Xtst extension to
the
* Marc Santhoff [EMAIL PROTECTED] [Thu, 01 Nov 2007 22:19:44
+0100]:
Am Donnerstag, den 01.11.2007, 17:03 +0300 schrieb 12 12:
Is there any cross-platform way to implement subj?
Suppose I need from Form2 to add some letter into TEdit which placed
on
Form1.
Except of WinAPI's SendInput.
At
13 matches
Mail list logo
