Cita:
Empezado por Gerson12
amigo muy buena tu respuesta pero al momento que genera las etiquetas que deseo los genera nuevamente al momento de presionar nuevamente el boton pero habra alguna forma de evitar esto espero mme hayan entendido
|
Tendrías que comprobar en cada línea si ya está la etiqueta, por ejemplo:
Código Delphi
[-]
var iX : integer;
begin
for iX=0 to memo1.lines.count-1 do
if Pos('etiqueta1', memo1.lines[iX]) <> 0 then
memo1.lines[iX] := 'etiqueta1' + memo1.lines[iX] + 'etiqueta2';
end;
// Saludos