Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by dominikkv,
8. Feb 2008
ähh... so halber^^
...oder sagen wir zu dreiviertel xD
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by dominikkv,
7. Feb 2008
ok, angeschaut -> abgeschrieben -> geht :angel2:
TfMain = class(TForm)
private
hNextViewer: DWORD;
protected
procedure WMChangeCBChain(var Msg: TMessage); message WM_CHANGECBCHAIN;
procedure WMDrawClipboard(var Msg: TMessage); message WM_DRAWCLIPBOARD;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by dominikkv,
7. Feb 2008
Danke erstmal für eure Antworten :hello:
:arrow: Das mit der ClipboardChain hatte ich schon ausprobiert (Clipboard Viewer), allerdings braucht der so ca 5 Sekunden bis er sich da eingeklinkt hat... zu lange!
:arrow: Ich hab den Timer jetzt mal so umgeändert:
procedure TfMain.tmrClipboardTimerTimer(Sender: TObject);
begin
if Clipboard.HasFormat(CF_TEXT) then
if oldClipboardText...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by dominikkv,
7. Feb 2008
Hi
Ich will das Clipboard überwachen und bei Änderungen den Text auswerten.
Ich hab mir also nen Timer geschnappt der jede Sekunde das ausführt:
uses
{...}, clipbrd, {...}
procedure TfMain.tmrClipboardTimerTimer(Sender: TObject);
begin
if oldClipboardText <> Clipboard.AsText then