ali_abbasi22145
یک شنبه 20 اردیبهشت 1388, 16:51 عصر
سلام
با زدن انتر من قبلا DynamicForm را كد زير باز مي كردم و اكنون باز نمي شود چرا؟
البته KeyPreview=True براي فرم اصلي است.
procedure TMainForm.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then DynamicForm.Show;
end;
با زدن انتر من قبلا DynamicForm را كد زير باز مي كردم و اكنون باز نمي شود چرا؟
البته KeyPreview=True براي فرم اصلي است.
procedure TMainForm.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then DynamicForm.Show;
end;