Oppure

Loading
10/03/10 14:06
Ciao a tutti.
Come da titolo volevo chiedere come faccio a copiare una determinata stringa negli appunti (cioè come faccio in modo da poter attraverso codice fare ciò che fa CTRL+C su una stringa selezionata)...
grazie...
10/03/10 19:06
Phi
A cosa ti serve? Perchè ho in mente un modo ma so se ti fa bene
aaa
10/03/10 20:12
semplicemente il mio scopo è quello di prendere un determinato testo (parlando del pascal può essere una stringa letta con readln(stringa), ma anche per Delphi copiando il testo da una textbox) e copiarlo senza fare CTRL+C ma attraverso una funzione...
10/03/10 20:56
Poggi Marco
Una volta acquisito il testo, dove lo vuoi salvare?
aaa
10/03/10 21:37
in poche parole quello che voglio farlo è salvarlo in un memoria in modo tale che quando su un QUALSIASI altro editor io premo CTRL+V mi si copi quel testo... sono stato chiaro?
26/05/11 20:58
Phi
Usando le API window puoi fare così:

uses windows;

function copiaappunti(s:string) : boolean;
var
 hcopy : longint;
 i, l : byte;
 pcopy : pchar;
begin
openclipboard(0);
emptyclipboard;
l:=length(s);
hCopy := GlobalAlloc(GMEM_MOVEABLE, l+1);
pcopy := GlobalLock(hCopy);
for i := 1 to l do pcopy[i-1]:=s[i];
pCopy[l] := #0;
GlobalUnlock(hcopy);
copiaappunti := SetClipboardData(CF_TEXT, hCopy) <> 0;
closeclipboard;
dispose(pcopy);
end;
Ultima modifica effettuata da Phi 26/05/11 21:00
aaa
28/05/11 19:22
Goblin
Se usi delphi è molto più semplice:
devi includere la unit "clipbrd" e poi basta assegnare il tuo valore alla clipboard con l'istruzione Clipboard.AsText := 'tua stringa';

G.
Ibis redibis non morieris in bello