Tisztelt Fórumozók!
A dBf.FieldDefs.FieldName szerkesztésekor,
a Caps Lock bekapcsolása után: ŐÚÖÜÓÉÁŰÍ karaktereket lehet a mezőnévben viszontlátni,
Caps Lock nélkül - a Shift lenyomásakor - ugyanez a dBf mezőnévben
valahogy így néz ki: ŐuÖiáűI? Ezen az Upcase() függvény sem segít.
Szeretném szerkesztés előtt a programmal bekapcsoltatni a Caps Locock-ot.
Egyenlőre nem tudom.
Kérdés:
Hogyan lehet Lazarussal ezt megoldani?
//forrás:
atlanta.atw.hu/a.html
procedure TForm1.Button1Click(Sender: TObject);
var KeyState : TKeyboardState;
begin
GetKeyboardState(KeyState);
if (KeyState[VK_CAPITAL] = 0) then
KeyState[VK_CAPITAL] := 1 // Bekapcsolja a Caps Lockot
else
KeyState[VK_CAPITAL] := 0; //Kikapcsolja a Caps Lockot
SetKeyboardState(KeyState);
end;