Copiar, Colar, Recortar...

Delphi

27/09/2003

alguem pode me ajudar com os comados de Copiar, Colar, Recortar, Desfazer e Excluir?? pq na apostila q eu tenho naum fala sobre isso

valew


Reloaded`

Reloaded`

Curtidas 0

Respostas

Marcelo Saviski

Marcelo Saviski

27/09/2003

Depende com o que for, se for com o Memo:

Para Copiar: memo1.CopyToClipboard;
Para recortar: memo1.CutToClipboard;
Para Colar: memo1.PasteFromClipboard;
Para Desfazer: memo1.Undo;
Para Excluir: 

procedure TForm1.Button1Click(Sender: TObject);
var
  s : string;
begin
  s := memo1.Text;
  Delete(s, memo1.SelStart + 1, memo1.SelLength);
  memo1.Text := s;
end;


é isso?


GOSTEI 0
Cebikyn

Cebikyn

27/09/2003

Eu acho que é mais fácil usando uma ActionList, que serve para qualquer componente, não necessita codificação e já coloca as figuras no ImageList.


GOSTEI 0
POSTAR