Access

Alternativna učenja

Android

Animacija

Antropologija

Apple - MAC OS X

Arheologija

Arhitektura

Astrologija

Astronomija

Audio kursevi + knjige

Audio, Multimedia, Video

Autobiografija

AutoCad, ArchiCAD, SolidWorks, Catia, Pro/Engineer

Automobili

Bajke

Baze podataka

Biografija

Biološke nauke

Botanika

C++ Visual C++ C#

Cloud

CSS

Dečije knjige

Delphi

Digitalna fotografija

Dizajn

Django

Domaće pripovetke

Domaći roman

Drama

E-knjiga

E-komerc

ECDL

Ekologija

Ekonomija

Elektrotehnika

Enciklopedija

Esejistika

Etika

Fantastika

Film

Filologija

Filozofija

Fizika

Fotografija

Geografija

Geologija

GOOGLE

Grafika, Dizajn, Štampa

Građevinarstvo

Hardver

Hemija

Hidrotehnika

Hobi

Horor

Humor

Internet

Intervju

Istorija

Istorija i teorija književnosti

Istorija umetnosti

Istorijski roman

Java, JavaScript, JScript, Perl

Joomla

jQuery

Knjiga posle posla - Beletristika i ostala izdanja

Knjižare i naše knjige

Književna kritika

Kuvari, hrana i piće

Leksikografija

Lingvistika

Ljubavni roman

logo

Magija

Marketing

Mašinsko učenje

Mašinstvo

Matematika

Medicina

Memoari

Menadžment

Modeliranje podataka

Monografija

Mreže

MS Office

Muzika

Nagrađivanje knjige

Naučna fantastika

Obrada teksta

OFFICE 2013

OpenOffice.org

Operativni sistemi

Oracle

Organizacione nauke

Pedagogija

PHP I MYSQL

Pisci u medijima

Ples

Poezija

Politika

Poljoprivreda

Popularna medicina

Popularna nauka

Popularna psihologija

Posao

Pozorište

Pravo

Pravoslavlje

Primenjene nauke

Pripovetke

Prirodne nauke

Priručnik

Programiranje

Psihologija

Publicistika

Putopis

Python programiranje

Raspberry PI

Rečnici

Religija

Robotika

Roman

Satira

Saveti

Sertifikati

Slikarstvo

Socijalna mreža - Facebook

Sociologija

Sport

Sport i hobi

SQL Server

Statistika

Strip

Tabele

Tableti

Tehnologija

Telekomunikacije

Triler

Turizam

Twitter

Udžbenici

Umetnost

Unix, Linux

Urbanizam

UX DIZAJN

Visual Basic .NET, VBA, V. Studio

Web design

Windows

Windows 7

Windows 8

WordPress

Zaštita i sigurnost

 

KAKO DA – premeštanje fokusa putem tastera Enter, Delphi

 

 

  • Twitter
  • Facebook
  • Google plus
  • Linkedin
  • Pinterest
  • Email

 

Pregleda (30 dana / ukupno): 18 / 1838

Navikli smo da se kroz forme Windows aplikacija krećemo pritiskom na taster [TAB]. Šta ako ovo želimo da promenimo i da fokus prebacujemo pritiskom na taster [Enter]?

U običajeno je da se kroz forme aplikacija krećemo pritiskom na taster [TAB], šta ako ovo želimo da promenimo i da fokus prebacujemo pritiskom na taster [Enter]? Sa druge strane podrazumevano je da, ako na nekoj formi pritisnemo Enter, simuliraće se pritisak na default taster. Ovo podrazumevano ponašanje možemo promeniti i to tako što izvršimo preraspodelu kontrole sa tastature, a to se radi preko osobine KeyPreview koju postavljamo na True. Ovim smo regulisali da naša forma, na svaki pritisak na taster, na tastaturi pozove handler za događaj OnKeyPress. Ovo ćemo dobiti ako sledeći kod ubacimo u FormKeyPress.

BEGIN
if Key = #13 then
if Not (ActiveControl is TDBGrid)
then
BEGIN
Key := #0 ;
Perform (WM_NEXTDLGCTL, 0, 0) ;
END
else
with TDBGrid (ActiveControl) do
if selecedtindex <> (FieldCount - 1)
then selecedtindex := selecedtindex + 1
else selecedtindex := 0 ;
END;

Šta radi ovaj programski kod? U prvom delu, u slučaju da je pritisnut taster [Enter] (#13), a aktivna kontrola (ActiveControl) nije TDBGrid, poništiće se taster i poslaće se poruka WM_NEXTDLGCTL. Ova poruka će kroz kontrolu na formi preću na Windows i izazvaće aktiviranje sledeće kontrole (kao da je pritisnuto [TAB]). Drugi deo koda obrađuje slučaj kada je pritisnuto Enter, a fokus se nalazi na TDBGrid kontroli. Sa ovim kodom izazivamo prelaženje sa jednog reda na drugi u kontroli za prikaz baze podataka. Ovde imamo dva podatka: FieldCount i SelectedIndex. Prvi podatak je broj polja u mreži (grid-u), a drugi indeks trenutnog polja. U slučaju da se nalazimo na poslednjem polju, prebacijemo se na prvo, a inače vršimo pomeraj za po jedno polje.

Pripremio: Milenko Kusurović

 

Budite prvi koji će ostaviti komentar.

Ostavite komentar Ostavite komentar