O uso de macros Delphi pode realizar algumas tarefas muito simples.
A macro começa com Ctrl + Shift + R, termina com Ctrl + Shift + R e toca com Ctrl + Shift + P.
Depois de começar a gravar a macro, você pode ver as palavras 'gravação' na barra de status.
A seguir é um exemplo de atribuir
Da seguinte maneira, existem muitas variáveis em nossa classe
dno: string [20];
DWorker: String [4];
ddate: tdateTime;
dtrade_s: string [10];
dtrade_e: string [10];
DMoney_Sale: Real;
dmoney_last: real;
DMoney_ss: real;
DMAN: String [2];
DMoney_SK: Real;
DMoney_ZL: Real;
Money_mode: real; // Valor do pagamento em dinheiro
Ticket_mode: real;
Czk_mode: real; // Valor de valor pago Valor
Mzk_mode: real;
Bank_mode: Real;
dcard_zk: string [20];
dcard_hl: string [20];
dsubshop: string [4];
Dsalesman: String [4];
Queremos atribuir seu valor ao valor correspondente de um objeto ASOURCE no design, como segue.
Por exemplo:
Procedimento tmasterData.assignValue (asource: tmasterData);
Começar
// eu quero obter os seguintes resultados
dno: = asource.dno;
dWorker: = asource.dworker;
ddate: = asource.ddate;
dtrade_s: = asource.dtrade_s;
dtrade_e: = asource.dtrade_e;
dmoney_sale: = asource.dmoney_sale;
dmoney_last: = asource.dmoney_last;
O que devemos fazer?
procedimento tmasterData.assignValue (asource: tmasterData);
Começar
dno: string [20];
DWorker: String [4];
ddate: tdateTime;
dtrade_s: string [10];
dtrade_e: string [10];
DMoney_Sale: Real;
dmoney_last: real;
....
Neste momento, primeiro nos concentramos no início da linha DNO, pressionamos Ctrl + Shift + R para começar a gravar e depois pressionamos Ctrl + -> Arrow, o cursor se moverá para a recepção da palavra DNO e depois pressionará Ctrl + Shift + ->, o DNO será selecionado: nesta seção, o que devo fazer se houver dois caracteres extras? -> Arrow e depois pressione <-arrow retorna para: antes e depois digite: = ASOURCE. O segundo: Antes, limpamos os seguintes caracteres, pressionamos o Shift + End e, em seguida, pressionamos a tecla Excluir, para que a primeira coluna seja concluída. e, em seguida, pressione o botão doméstico.
Isso é tudo as nossas chaves.
Se estamos muito familiarizados com as macros de Delphi, podemos fazer muitas coisas maravilhosas, como costumamos ter no MSSQL
Atualizar um conjunto dnum = b.dnum pode ser completamente realizado usando macros Delphi.
Pontos -chave da gravação de macros,
1 Certifique -se de prestar atenção às regras legais de escrita de código
2 Use Ctrl + Shift + -> setas para selecionar palavras
3 Todas as operações devem ser concluídas usando um teclado
dno: = asource.dno