[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!!!!

qualcuno sa darmi qualche dritta in proposito?

Thanks!

[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!

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