Udklipsholder

jeg har f.eks. gjort sådan:

  Memo1.Clear;
  Memo1.Lines.Add(EditNAVN.Text);
  Memo1.Lines.Add(EditADRESSE.Text);
  Memo1.Lines.Add(EditPOSTNRBY.Text);
  Memo1.SelectAll;
  Memo1.CopyToClipboard;

Du kan også bruge TClipboard.

Prøv at tilføje Clipbrd i uses.

I den procedure du vil bruge udklipsholderen skriver du følgende:
var
  tekst: String;
begin
  tekst:='Denne tekst skal kopieres';
  Clipboard.Text:=tekst; //her er jeg dog ikke helt sikker!
end;

Svar !

altså:

uses Clipbrd;

procedure Button1Click(Sender: TObject);
var
  tekst: String;
begin
  tekst:='Denne tekst skal kopieres!';
  Clipboard.Text:=tekst;
end;

i Athlon-Pascals løsning skal der bruges

Clipboard.AsText:= tekst;

Nå jo, det er sådan det er...

Hvis du vil paste, så gør det omvendt:
tekst:=Clipboard.AsText;

Tak for points :)