[Delphi] Clipboard

[Argosoft]

Penso che questo sia il mistero più grande di Delphi: PERCHE' LE PROCEDURE TAGLIA COPIA E INCOLLA NON FUNZIONANOOOO!!!!
Dunque, sto facendo un programma in cui devo usare la clipboard, quindi

uses ClipBrd;

e va bè; facendo un po' di prove si scopre che

Memo.PasteFromClipboard

funziona perfettamente;

Memo.CutToClipboard
Memo.CopyToClipboard

NON FUNZIONANOOOOOOOOOOO!!!! :muro: :muro:

qualcuno sa darmi qualche dritta in proposito?

Thanks!
:cry:

[maxithron]

potresti postare il listato per intero?

[Argosoft]

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ClipBrd;

type
TFormMain = class(TForm)
Memo: TMemo;
Incolla: TButton;
Copia: TButton;
Taglia: TButton;
procedure IncollaClick(Sender: TObject);
procedure CopiaClick(Sender: TObject);
procedure TagliaClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
FormMain: TFormMain;

implementation

{$R *.dfm}

procedure TFormMain.IncollaClick(Sender: TObject);
begin
Memo.PasteFromClipboard;
end;

procedure TFormMain.CopiaClick(Sender: TObject);
begin
Memo.CopyToClipboard;
end;

procedure TFormMain.TagliaClick(Sender: TObject);
begin
Memo.CutToClipboard;
end;

end.


... se può servire come informazione... uso delphi 6 enterprise

la form:

[Argosoft]

uuuuuuuuuuuuuuuuhhhhh che ho scopertooooo!

1- che sono una merda per non accorgermi che...
2- con Cut e Copy... viene copiato o tagliato quacosa SOLO SE SELEZIONATO! :nera:

quindi adesso la domanda cambia... come faccio a selezionare TUTTO il contenuto di un Memo o di un RichEdit?