モナーの *やさしい* Delphi質問スレ Ver3
■ このスレッドは過去ログ倉庫に格納されています
0600デフォルトの名無しさん
NGNGあ、すみません。↑↓キーはできたのですが、
スペースキーがアウトみたいです。
何故文字の時はダメなのでしょうか
case key of
vk_up :
begin
ll.ItemIndex :=ll.ItemIndex +1;
key:=0;
end;
vk_down:
begin
ll.ItemIndex :=ll.ItemIndex +1;
key:=0;
end;
vk_space:
begin
e.Text := ll.Items.Strings[ll.ItemIndex];
key:=0;
Sender:=nil;
end;
end;
■ このスレッドは過去ログ倉庫に格納されています