在屏幕上写字(50分)

J

johnpan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-15

• #1

大家好:
我想请教一个问题:
如何在FORM之外的屏幕上写几个字,我想可能用TCONVAS可以,但是不知道用谁
的CANVAS.

 

W

www

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-15

• #2

可以写在桌面上。
var dskcanvas:TCanvas;
begin
dskcanvas:=tcanvas.create;
dskcanvas.handle:=getdc(0);
dskcanvas.textout(1,1,'asdfasdfasdf');
end;

 

K

kangxy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-15

• #3

DC := GetDC(0);

ACanvas := TCavnas.Create;
TCanvas.Handle := DC:

 

T

TomTom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-16

• #4

用win api getdc()函数，用raleasedc()释放。

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-17

• #5

var
dc：hdc；
begin
dc：=getdc（0）；
dc。textout（320，240，‘hell delphiuser’）；
releasedc（dc）；
end；
试试。

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-17

• #6

有没有搞错? dc有textout这个方法吗?????

 

G

g622

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-22

• #7

我曾经在网上见过这样的一个例子,
具体想不起来了.
我去找一找.

 

阿

阿蒙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-24

• #8

不知道。知识看过没用过 dc

 

L

Luckm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-24

• #9

应该用GetWindowDC,具体如下（使用的是C++ BUILDER，
改改就可以用在DELPHI上）：
--------------------------------------------------
HWND HandleOfDesktop;
HDC HdcOfDesktop;
HandleOfDesktop=GetDesktopWindow();
HdcOfDesktop=GetWindowDC(HandleOfDesktop);
TextOut(HdcOfDesktop,100,100,(LPCTSTR)"This is my DESKTOP",18);
ReleaseDC(HandleOfDesktop,HdcOfDesktop);
--------------------------------------------------------------
其中GetDesktopWindow(),GetWindowDC(),TextOut()&ReleaseDC()
均为WIN API函数。

 

B

banelon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-24

• #10

var
hdldtp:thandle;
hdcdtp:hdc;
begin
hdldtp:=GetDesktopWindow();
hdcdtp:=GetWindowDC(hdldtp);
TextOut(hdcdtp,500,300,'Welcome to delphi bbs!',22);
ReleaseDC(hdldtp,hdcdtp);
end;
和luckm的思路完全一样，可能TEXTOUT还不能满足你的显示要求，自己再改动改动吧！

 

J

johnpan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-01-24

• #11

多人接受答案了。