W
wl821205
Unregistered / Unconfirmed
GUEST, unregistred user!
var
a: Boolean;
begin
a := (key >= #97) and (key <= #122);
if a then key := #0;
if (key = #13) and (trim(ComboBoxPartNo.Text) <> '') then
begin
if ComboBoxPartName.Enabled then
ComboBoxPartName.SetFocus // 光标位置
else
Edit2.SetFocus; // 光标位置
end;
请哪位老兄,帮我解释一下 a := (key >= #97) and (key <= #122);
if a then key := #0;这两句代码,如有相关资料,到哪个网站可以看到
a: Boolean;
begin
a := (key >= #97) and (key <= #122);
if a then key := #0;
if (key = #13) and (trim(ComboBoxPartNo.Text) <> '') then
begin
if ComboBoxPartName.Enabled then
ComboBoxPartName.SetFocus // 光标位置
else
Edit2.SetFocus; // 光标位置
end;
请哪位老兄,帮我解释一下 a := (key >= #97) and (key <= #122);
if a then key := #0;这两句代码,如有相关资料,到哪个网站可以看到