El uso de Macros de Delphi puede hacer algunas tareas muy simples.
La macro comienza con Ctrl + Shift + R, termina con Ctrl + Shift + R, y se reproduce con Ctrl + Shift + P.
Después de comenzar a grabar la macro, puede ver las palabras 'grabar' en la barra de estado.
El siguiente es un ejemplo de asignación
De la siguiente manera, hay muchas variables en nuestra clase.
DNO: cadena [20];
DWorker: cadena [4];
ddate: tdatetime;
dtrade_s: cadena [10];
dtrade_e: cadena [10];
dmoney_sale: real;
dmoney_last: real;
dmoney_ss: real;
dman: cadena [2];
dmoney_sk: real;
dmoney_zl: real;
Money_Mode: real;
Ticket_mode: real;
CZK_MODE: Real; // Monto de pago de la tarjeta de valor
Mzk_mode: real;
Bank_Mode: real;
dcard_zk: cadena [20];
dcard_hl: cadena [20];
dsubshop: cadena [4];
dsalesman: cadena [4];
Queremos asignar su valor al valor correspondiente de un objeto Asource en Asignación, como sigue.
Por ejemplo:
Procedimiento tmasterData.AssignValue (Asource: TMasterData);
Comenzar
// Quiero obtener los siguientes 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;
¿Qué debemos hacer?
procedimiento tmasterData.AssignValue (Asource: TMasterData);
Comenzar
DNO: cadena [20];
DWorker: cadena [4];
ddate: tdatetime;
dtrade_s: cadena [10];
dtrade_e: cadena [10];
dmoney_sale: real;
dmoney_last: real;
....
En este momento, primero nos centramos en el comienzo de la línea DNO, presionamos Ctrl + Shift + R para comenzar a grabar, luego presione Ctrl + -> Arrow, el cursor se moverá hacia la recepción de la palabra DNO y luego presione CTRL + Shift + ->, se seleccionará DNO: en esta sección, ¿qué debo hacer si hay dos caracteres adicionales? -> Flecha y luego presione <-Row vuelve a: Antes, y luego ingrese: = Asource. El segundo: antes, borra los siguientes caracteres, presionamos Shift + End y luego presionamos la tecla Eliminar, de modo que la primera columna se complete. y luego presione el botón de inicio.
Esto es todas nuestras teclas.
Si estamos muy familiarizados con las macros de Delphi, entonces podemos hacer muchas cosas maravillosas, como a menudo tenemos en MSSQL
Actualizar un conjunto dnum = b.dnum se puede lograr completamente usando Macros Delphi.
Puntos clave de registro de macros,
1 Asegúrese de prestar atención al código de escritura de reglas ordenadas
2 Use Ctrl + Shift + -> Flechas para seleccionar palabras
3 Todas las operaciones deben completarse utilizando un teclado.
dno: = asource.dno