Hola, amigos.
¿Alguien podría decirme cómo funciona esa función? Yo hago esto, pero aparece un error (algo de puntero inválido, o función de puntero inválido, no lo recuerdo bien).
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var P: PChar;
begin
P:='';
If Clipboard.HasFormat(CF_TEXT)then Clipboard.GetTextBuf(P,NUMERO);
Memo1.Text:=P;
end;
En la ayuda de Delphi, donde pongo NUMERO dice que utilice la función GetTextLen, pero el Clipboard no la tiene. En NUMERO también probé con cero y con MAX_PATH (ya no sabía qué hacer).
Por supuesto, esto era un programa de prueba. No quiero "Pegar del portapapeles", sino extraer el texto del Portapapeles para modificarlo.
Utilizo Delphi 3 Standard.
Muchas gracias.