ClipBord

[oldmann]

Hallo,
ich habe ein kleines Delphi-Programm in der Taskbar aktiv und kann jetzt per Tastatur einen Text über ClipBord in die Zwischenablage kopieren.
Wie bekomme ich diesen Text in ein externes Formular (Textdatei, Textverarbeitung).
Ich kenne zwar PasteFromClipboard aber ich weiß nicht wie ich damit den Text in die fremde Anwendung bekommen soll.
Es soll folgendermaßen ablaufen:
Ich öffne z. B. eine Textverarbeitung und möchte nun einen vordefinierten Text über eine Tastenkombination z.B. (Strg +T) den mein Programm dann in die Zwischenablage kopiert, sofort in die Textverarbeitung einfügen.
Vielleicht könnte mir hier jemand auf die Sprünge helfen.

Gruß Oldmann

[DelphiKevin]

Ich kann dir leider nicht helfen, aber vielleicht kannst du mir kurz helfen...
Ich habe keine Ahnung wie ich eine Frage stellen kann?

[oldmann]

Hallo,

wenn Du angemeldet bist klicke auf 'Neues Thema erstellen',

Gruss Olmann

[Der schöne Günther]

Wenn ich dich richtig verstehe ist dein einziges Problem doch nur zu erkennen dass jemand [Strg]+[T] gedrückt hat, den Rest hast du im Griff, oder?

[Jumpy]

Ich hätte jetzt gedacht, das Problem ist der Textverarbeitung automatisiert zu sagen, das an irgendeiner Stelle was rein gepastet / eingefügt werden soll. Dazu müsste man mMn die Textverarbeitung erstmal fernsteuern, oder?

[freimatz]

Ich bezweifle dass er den "Rest" im Griff - oder ich verstehe es falsht.
Es geht doch darum wie er den Text in die Textverarbeitung bekommt. Diese Textverarbeitung ist aber nicht sein Delphi-Programm - oder? Ic habe mich jahrelang mich damit beschäftigt, meinen Text in eine fremde Textverarbeitung zu schieben. Der Anwender muss wo einstellen, was er denn hat. Bei extrem wenigen kann man dann ein wm_Paste schicken. Bei den meisten muss man über FindWindow das Fenster raussuchen und dann die richtige Message schicken.
Gescheitert bin ich dnn bei Staroffice. Und weil die in der Mailingliste so arrogant waren habe ich es dann gelassen.

[oldmann]

Hallo,

erst mal Danke für die rege Anteilnahme.
Nochmal zum besseren Verständnis.
Der Anwender hat eine Textverarbeitung oder ein Textdokument geöffnet und der Cursor steht in der Textverarbeitung an einer leeren Stelle.
Wenn der Anwender jetzt "Strg+T" drückt wird ein vorher bestimmter Text in die Zwischenablage von Windows kopiert.
Ich möchte das dieser Text jetzt automatisch in der Textverarbeitung an der Cursorposition eingefügt wird.
Ich möchte also nicht noch einmal "Control + Einf" drücken müssen.
Also den Text in die Zwischenablage kopieren klappt.
Was noch nicht klappt ist den Text in der Textverarbeitung oder dem Textdokument einzufügen.

Gruss Oldmann

[KodeZwerg]

Zitat von DelphiKevin:

Ich kann dir leider nicht helfen, aber vielleicht kannst du mir kurz helfen...
Ich habe keine Ahnung wie ich eine Frage stellen kann?

Das war doch eine Frage?

[oldmann]

Hallo,
scheinbar gibt es immer noch unklarheiten mit meiner Frage.
Es ist ein Sytemweiter Hotkey.
Der Text liegt schon in der Zwischenablage von Windows.
Ich möchte gerade vermeiden, dass der Anwender zusätzlich Tasten drücken muss.
Das Ziel ist, das der Text aus der Zwischenablage in einem Zug in das Textdokument eingefügt wird.
Also der Anwender drückt "Strg+E" und der hinterlegte Text wird in die Zwischenablage kopiert.
Also wie bekomme ich den Text ohne zusätzlich Tasten zu drücken in das Textdokument.
Ich hoffe, dass das deutlich war.

Gruss Oldmann

[ghubi01]

Hallo,

ich gehe mal davon aus, dass MS-Word zur Textverarbeitung verwendet wird.
In diesem Fall könnte man das so realisieren:

Delphi-Quellcode:

procedure CpClipToWord;
var
  WordApp, WordDoc: OleVariant;
begin
  try
     WordApp := GetActiveOleObject('Word.Application'); // Aktives geöffnetes Word
   except
     Exit;
   end;
   WordDoc:=WordApp.ActiveDocument;    // Aktives Worddokument
   WordApp.Selection.Paste;            // Inhalt vom Clipboard an der aktuellen Cursorposition im Worddokument schreiben
   WordApp.Selection.TypeText(#13#10); // ggf. den Cursor in die nächste Zeile setzen
end;

Wie das mit anderen Textverarbeitungs-Tools geht, kann ich Dir nicht sagen.