beklager meget... de koder jeg skrev er til visual Basic.... så her er de til delphi.
Copy (kopier)
Denne kommando kopiere den markerede tekst til "clipboarded" (ligesom CTRL C)
<pre>procedure TForm1.copyclick(Sender: TObject);
begin
RichEdit1.SelectAll;
RichEdit1.CopyToClipboard;
Edit1.Clear;
Edit1.PasteFromClipboard;
RichEdit1.SetFocus;
end;</pre>
Cut (Flyt)
Flytter den valgte tekst til clipboarded. (kopierer men clearer teksten)
<pre>procedure TForm1.cutclick(Sender: TObject);
begin
RichEdit1.SelectAll;
RichEdit1.CopyToClipboard;
Edit1.Clear;
Edit1.PasteFromClipboard;
RichEdit1.SetFocus;
richtedit1.lines.clear;
end;</pre>
Håber du kan bruge dem.
ellers er de beskrevet i Delphis Hjælpe fil (ihvertfald i Delphi 6.0 entreprise.)
Her kan du sikkert finde flere funktioner..
Happy Hunting
Ken Christensen
Christensenken@hotmail.com
www.kenchristensen.tk[Redigeret d. 09/08-02 23:16:44 af Ken Christensen]