Contenu du clipboard dans un tstringlist

Bonjour

j'aurai besoin de placer le contenu du clipboard (reconnu comme CF_TEXT) dans un tstringlist, en controlant si possible le nombre de strings remplies.

autant dans un memo y a la commande pastefromclipboard, autant je suis tout demuni avec un tstringlist...

quelqu'un aurait il une piste?

merci

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

uses Clipbrd;   procedure CopierPressePapierDansStringList(var SL: TStringList); begin with TClipboard.Create do try SL.Text := AsText; finally Free; end; end;

---