Cristhor1982,
Cita:
Empezado por Cristhor1982
Necesito que los valores Vacios de lo que copio no los inserte, trate con un IF TS[i]='' then..etc pero no puedo
|
La solución que te propuse en el
Mensaje #4 tiene el siguiente código:
Código Delphi
[-]
procedure Split(const Delimiter: Char; Input: string; const Strings: TStrings);
begin
Strings.Clear;
Strings.Delimiter := Delimiter;
Strings.DelimitedText := Input;
end;
Luego, si hay texto en el Clipboard este es procesado:
Código Delphi
[-]
if Clipboard.HasFormat(CF_TEXT) then
begin
Split(' ',Clipboard.AsText,StrList);
...
De esta forma solo se copia al TStringList los valores
diferentes de blanco del Clipboard, usando el carácter blanco como separador de data.
Adicionalmente:
No verifica si el valor es blanco, solo verifica si el valor es empty, contrariamente:
Si verifica si el valor es blanco.
Te sugiero probar
ambas opciones e implementes la que mejor se adapte a tu proyecto.
Espero sea útil
Nelson.