Asphyre 引擎沟通专用主题

Asui_85

OICQ 群号码 : 3488862

由于 Asphyre 引擎的速度实在是太快了!
所以非常喜欢

大家一起来这里学习如何!

Asui_85

关于汉字显示问题请到 群内向 群主要!

S.F.

支持一下

Asui_85

谢谢支持谢谢支持!
诶!
DELPHI的人怎么这么冷淡呢?

DraculaLin

昨天???了Asphyre的作者得知使用??示部份?D像的方法
特?e?⑺??b一??易用的程序:
procedure DrawRect(ImageIndex,Pattern,X,Y,X1,Y1,X2,Y2:Integer;
                      Color:TColor4;op:Integer);

procedure TMainForm.DrawRect(ImageIndex,Pattern,X,Y,X1,Y1,X2,Y2:Integer;
                      Color:TColor4;op:Integer);
var
Coord:TTexCoord;
begin
  Coord.Flip:=False;
  Coord.Mirror:=False;
  Coord.Pattern:=Pattern;
  Coord.SrcX:=X1;
  Coord.SrcY:=Y1;
  Coord.Width:=X2;
  Coord.Height:=Y2;
  PowerDraw.Device.TexMap(Images[ImageIndex], pBounds4(X,Y,
                          Coord.Width,Coord.Height),
                          Color, Coord, op);
end;
另外??了一???????玫睦?影l上?斫o你???⒖家幌

Asui_85

诶!
多谢大家啊!
努力学习,呵呵.
发我的显示汉字引擎!
正在研究怎么输入汉字!

function Draw(Image: TAsphyreImage; Xpos, Ypos, Pattern, Op: Integer; color: TColor4): Integer;
begin
  Result := FDriver.PowerDraw.Device.TexMap(Image, pBounds4(Xpos, Ypos, Image.Width, Image.Height), color, tPattern(Pattern), Op);
end;

function  draw_text(x,y:integer;text:string;color: TColor4):integer;
  //中文字索引：全角
  function china_font_index(str:string):integer;
  begin
  Result:=(ord(str[1])-129)*126+(ord(str[2])-129);
  end;
  //英文字索引：半角
  function English_font_index(str:string):integer;
  begin
  Result:=ord(str[1])-32;
  end;
var
len,i:integer;
begin
len:=0;
while len<>length(text) do
  begin
    i:=len+1;
    if ord(text)>128 then
      begin
        draw(FDriver.china_font_index,x+len*6,y,china_font_index(COPY(text,i,2)),opSrcAlpha or opDiffuse,color);
        len:=len+2;
      end
    else
      begin
        draw(FDriver.english_font_index,x+len*6,y,English_font_index(copy(text,i,1)),opSrcAlpha or opDiffuse,color);
        len:=len+1;
      end;
  end;
Result:=len*one_char_size;
end;

可以显示不同颜色的汉字呵呵!
字库生成的那软件还是麻烦各位去我QQ或群里要!
因为实在是传不上来!

S.F.

Asphyre 为什么在我电脑上运行的时候提示 Failed to initialize Direct3D ??难道需要安装最新的Directx 9.0 ?

simon2000

是Directx 9.0C，你的版本可能低一些

DraculaLin

Asphyre?造?D像?形的函式:
TexMap(images[0],pPoint4(x1,y1,x2,y2,x3,y3,x4,y4),
          clWhite4,tcNull,opDiffuse);

改?x1,y1,x2,y2,x3,y3,x4,y4的值就可?作出?形,扭曲的效果

Asui_85

Asphyre 只能用他自己的VTDB类型资源文件么?
如何使用自己定义的资源格式?