Clomosy | Forum : VirtualKeyboard Klavye desteği https://www.clomosy.com.tr/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Tue, 14 Apr 2026 23:39:47 +0000 Thu, 15 Jun 2023 11:31:18 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.07 360 https://www.clomosy.com.tr/RSS_post_feed.asp?TID=507 <![CDATA[Clomosy | Forum]]> https://www.clomosy.com.tr/forum_images/logo.png https://www.clomosy.com.tr/ <![CDATA[VirtualKeyboard Klavye desteği : Bu özelliğin kullanımına ait bir...]]> https://www.clomosy.com.tr/forum_posts.asp?TID=507&PID=527#527 Yazar: Saliha Göçergi
Konu: 507
Gönderim Zamanı: 15 Haziran 2023 Saat 11:31

Bu özelliğin kullanımına ait bir örnek;

var
  MyForm : TclForm;
  Edt1: TclEdit;
  Lyt1 : TclLayout;
  
procedure VirtualKeyboardShow;
begin
  Edt1.Margins.Bottom := MyForm.clVKBoundsHeight;
end;

procedure VirtualKeyboardHidden;
begin
  Edt1.Margins.Bottom := 0;
end;


begin

  MyForm := TclForm.Create(Self);
  MyForm.AddNewEvent(MyForm,tbeOnVirtualKeyboardShown,'VirtualKeyboardShow');
  MyForm.AddNewEvent(MyForm,tbeOnVirtualKeyboardHidden,'VirtualKeyboardHidden');
  Lyt1 := MyForm.AddNewLayout(MyForm,'Lyt1');
  Lyt1.Align := alClient;
  
  Edt1 := MyForm.AddNewEdit(Lyt1,'Edt1','Click and See!');
  Edt1.Align := AlBottom;
 
  MyForm.Run;
end;
]]> Thu, 15 Jun 2023 11:31:18 +0000 https://www.clomosy.com.tr/forum_posts.asp?TID=507&PID=527#527 <![CDATA[VirtualKeyboard Klavye desteği : TclForm üzerinde,tbeOnVirtualKeyboardShown...]]> https://www.clomosy.com.tr/forum_posts.asp?TID=507&PID=526#526 Yazar: Benhur
Konu: 507
Gönderim Zamanı: 07 Haziran 2023 Saat 20:55

TclForm üzerinde, tbeOnVirtualKeyboardShown ve tbeOnVirtualKeyboardHidden eventları bulunmaktadır. bunlar içinde aşağıdaki değişkenler desteklidir;    
    clVKVisible:Boolean;
//virtual keyboard bounds.
    clVKBoundsLeft,
    clVKBoundsRight,
    clVKBoundsWidth,
    clVKBoundsHeight:Single;

]]> Wed, 07 Jun 2023 20:55:06 +0000 https://www.clomosy.com.tr/forum_posts.asp?TID=507&PID=526#526