Ładny brzuch
Witam, wiecie moze jak mozna zrobic aby wcisniety klawisz zosta wyswietlony w memo ?? Konkretny klawisz nie np. odpowiadajacy mu kod ASCII ??
Pomocy, PILNE.
Pozdro 4 all.
Aha, jeszcze jedno. Dlaczego wywala mi blad przytym
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
Begin
If Key = VK_A Then Memo1.Lines.Add('A');
End;
Bd:
[Error] Unit1.pas(36): Undeclared identifier: 'VK_A'
Dodam jeszcze ze jezeli uzywam VK_UP wszystko jest dobrze,
co z tym zrobic ??
var
y,i:integer;
begin
for i:=32 to 255 do
Richedit1.lines.add(inttostr(0)+inttostr(i)+'='+chr(i));
Asdef
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Pomocy, PILNE.
Pozdro 4 all.
Aha, jeszcze jedno. Dlaczego wywala mi blad przytym
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
Begin
If Key = VK_A Then Memo1.Lines.Add('A');
End;
Bd:
[Error] Unit1.pas(36): Undeclared identifier: 'VK_A'
Dodam jeszcze ze jezeli uzywam VK_UP wszystko jest dobrze,
co z tym zrobic ??
var
y,i:integer;
begin
for i:=32 to 255 do
Richedit1.lines.add(inttostr(0)+inttostr(i)+'='+chr(i));
Asdef