TMemo - Kopieren aus Memo verbieten [erledigt]

[BiBi]

Hallo,

habe wieder eine Frage zu TMemo.

Wie kann ich verhindern, dass im Memo Text markiert wird und dadurch über die Zwischenablage in anderen Anwendungen (z.B. Notepad) eingefügt werden kann.

Vorab schon mal Danke.

Gruß

[bundy]

Hallo,
weise einfach dem Memo ein leeres Popupmenue zu

[alanblack]

HI,

Bibi will ja verhindern das der Text markiert wird.. oder habe ich das falsch verstanden?

[ims]

hi BiBi

setze einfach im OI die eigenschaft "Enabled" auf false, oder im code

form1.Memo1.Enabled := false dadurch wird der text zwar in einer leicht anderen farbe angezeigt aber es ist nun nicht mehr möglich text zu kopieren.


gruss, dave

[APP]

Hallo,
das hatten wir schon einmal: Verhindern aus einem Memo zu kopieren (Sakuras Beispiel)

[Sharky]

Zur Not geht das auch recht einfach mittels der MouseDown , MouseUp , MouseMove Ereignisse. Und einem eigenen PopUp-Menü für das Memo.

[Jens Schumann]

Hallo,
ich habe es vor langer Zeit mal so gelöst:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  clipbrd;

type
  TForm1 = class(TForm)
    procedure FormDeactivate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormDeactivate(Sender: TObject);
begin
  ClipBoard.Clear;
end;

end.

Der Inhalt des Memos wird zwar immer noch selektiert und in die Zwischenablage kopiert aber wenn das Formular deaktiviert wird, wird die Zwischenablage gelöscht.
Das Formular wird deaktiviert wenn der Anwender zu einer anderen Anwendung wechselt, um
den Inhalt der Zwischenablage einzufügen.

[BiBi]

Hallo,

Erstmal Danke für die Vorschläge. Ich Analysiere Textdateien und zeige das Ergebniss in einem Memo an. Damit der Inhalt des Memo nicht in die Zwischenablage kopiert werden kann, möchte ich das kopieren verhindern. Mit einem eigenen PopUp habe ich schon versucht, kann dann aber immer noch den Text mit der Tastatur markieren und mit CTRL C kopieren. Die Zwischenablage löschen beim Programm beenden ist mir zu spät, denn wenn das Programm noch läuft, geht das kopieren immer noch. Mit Memo.Enabled := FALSE kann ich nicht mehr nach unten blättern. Sakuras Beispiel sieht mir auf den ersten Blick sehr gut aus. Werde ich gleich versuchen.

Bis demnächst

Gruß

[BiBi]

@Jens Schumann,

Sorry, habe Deinen Text nicht richtig gelesen. Werde ich auch testen.
Danke.

Gruß

[Luckie]

Zitat von Jens Schumann:

Der Inhalt des Memos wird zwar immer noch selektiert und in die Zwischenablage kopiert aber wenn das Formular deaktiviert wird, wird die Zwischenablage gelöscht.
Das Formular wird deaktiviert wenn der Anwender zu einer anderen Anwendung wechselt, um
den Inhalt der Zwischenablage einzufügen.

Schön und wenn gerade was von einer anderen Anwendung in der Zwischenablage steht und der Anwwender mal kurz zwischendurch mit deinem Programm was macht?