pasar de listbox a clipboard

[lastfenix]

oigan como paso de un objeto seleccionado en un listbox al portapaeles(clipboard)?

[[Delphius]]

No me acuerdo mucho... pero investiga sobre TClipboard en la ayuda de delphi.
En uses debes declarar una librería, (Clipbrd)...
despues puedes declarar una variable de tipo TClipboard y con dicha variable puede agregar lo que quieras al portapapeles. Lo mismo puedes hacer a la inversa: copiar desde el portapapeles.

Espero haberte ayudado en algo.

[dec]

Hola,

Como apunta Delphius podría tratarse de utilizar de la unidad "ClipBrd" la clase "TClipBoard" más o menos de este modo:

Código Delphi [-]
uses
   ClipBrd;
 
 procedure TForm1.Button1Click(Sender: TObject);
 var
   s: string;
   i: integer;
   cb: TClipboard;
 begin
   i := ListBox1.ItemIndex;
   if i > -1 then
   begin
     cb := TClipboard.Create;
     s := ListBox1.Items[i];
     cb.SetTextBuf(PChar(s));
     cb.Free;
   end;
 end;

[Neftali [Germán.Estévez]]

...sólo un apunte a lo comentado; En caso de añadir la unit clipbrd al uses ya no hace falta crear la variable del tipo TClipBoard, ya que la propia clase devuelve un objeto al intentar accederlo (tiene una función que lo crea si no existe); Así que el código se puede quedar en:

Código Delphi [-]
 uses
   ClipBrd;
 
 procedure TForm1.Button1Click(Sender: TObject);
 var
   s: string;
   i: integer;
 begin
   i := ListBox1.ItemIndex;
   if i > -1 then
   begin
     s := ListBox1.Items[i];
     Clipboard.SetTextBuf(PChar(s));
     // o tambien...
     Clipboard.AsText(s); 
   end;
 end;

[dec]

Hola,

Nunca te acostarás sin saber una cosa más. Pintiparado refrán.

Gracias Neftali.