Não deu certo. Eu quero que abra o form de pesquisa quando teclo F2 no Edit.
Fiz assim, mas está dando erro! Alguém sabe o que pode ser?
procedure T_Form1.MnPesquisarClick(Sender: TObject);
begin
if (_Form1.ActiveControl = _Form1.Edit5) then begin
{TENTEI TBÉM COLOCAR if (Edit5.Focused) then
Olá a todos
Na compilação está aparecendo o seguinte erro:
Arquivo: DbConst.Pas
Erros: Unterminated string
";" expected but identifier "SFieldAcessError" found()
Não sei o que fiz, mas este erro apareceu após as últimas modificações, e sei
que este arquivo é de uso interno, portanto "a
2 matches
Mail list logo