einen string ins clipboard

[ErazerZ]

in Delphi7
  Edit1.CopyToClipboard; ansonsten

Delphi-Quellcode:

uses ClipBrd;

...
var
  Clip: TClipBoard;
begin
  Clip := TClipBoard.Create;
  Clip.SetTextBuf(PChar(Edit1.Text));
  Clip.Free;
end;