请问:如何做一个手机界面(100分)

K

kntrue

Unregistered / Unconfirmed
GUEST, unregistred user!
请问:如何做一个手机界面,用什么控件比较好??
是不是还需要下载一个手机的图形,如果是要什么格式的??
-----请指点不胜感激!!
 
手机界面就是一个图片而已吧,如果想做其他开发,可以用borland和nokia的sdk
 
对,如果仅仅是一个界面可以找到这样的第三方控件,像Skin之类的第三方控件都可以。
http://wolfsoft.nugoo.com
 
下一个手机图片
把他做成窗体
把一个图片做成窗体的例子很多的
原理也不难的,看看就懂了
 
楼上都说完了
 
感谢各位大虾:我做的软件以完了,可是老师要一个漂亮界面,能否告诉我,
如何把一个图片做成窗体,有没有相关资料的网址,图片是什么格式的???[?]
 
图片用bmp的,背景色要唯一,比如说黑色。
窗体bsnone,AutoSize:=True;
BackColor:TColor;
BackColor:=Image1.Canvas.Pixels[2,2];//假设这里是要过滤的背景色
procedure TForm1.FormShow(Sender: TObject);
var
MyRgn, ClientRgn, ButtonRgn,bmpRgn: THandle;
Margin, X, Y: Integer;
p : Tpoint;
begin
Margin := (Width - ClientWidth) div 2;
MyRgn := CreateRectRgn(0, 0, Width, Height);
X := Margin;
Y := Height - ClientHeight - Margin;
ClientRgn := CreateRectRgn(X, Y, X + ClientWidth, Y + ClientHeight);
CombineRgn(MyRgn, MyRgn, ClientRgn, RGN_XOR);
//X := X + Button1.Left;
// Y := Y + Button1.Top;
// ButtonRgn := CreateRectRgn(X, Y, X + Button1.Width, Y + Button1.Height);
//-----------!!-----------
//有别的控件可以在这里插入。
// CombineRgn(MyRgn, MyRgn, ButtonRgn, RGN_XOR);
//Image1.Picture.LoadFromFile('c:/ts1.bmp');
for x:=0 to Image1.width-1do
for y:=0 to Image1.height-1do
begin
if Image1.Canvas.Pixels[x,y]<> BackColor then
begin
bmpRgn:= CreateRectRgn(x,y,x+1,y+1);
CombineRgn(MyRgn,MyRgn,bmpRgn,RGN_XOR);
end;
end;
SetWindowRgn(Handle, MyRgn, True);
end;
 
用著名的coolcontrol控件保证把你的老师cool死。
 
用这个 activeSkin!
 
奄在delphi.mychangshu.com上传了一个activeSkin4.1完美破解版
 
谢谢各位大虾:我用skinform已经搞定,我谨给各位配上积分表示感谢!!1:)

 
顶部