Introduction - If you have any usage issues, please Google them yourself
Mir2 Actor.pasif (IsFace) and (FaceIndex>-1) then begin d: = aFrmMain.WFaceimg.Images [FaceIndex* 10+ (FaceFram) mod 8]///if HorseSurface <> nil then// dSurface.Draw (dx+ shiftx, dy+ hpy+ ShiftY-60, d.ClientRect, d, TRUE)// else if d <> nil then begin if HorseSurface <> nil then dsurface.Draw (SayX- d.Width div 2 , dy+ hpy+ ShiftY- 60, d.ClientRect, d, True) else dsurface.Draw (SayX- d.Width div 2, dy+ hpy+ ShiftY- 50, d.ClientRect, d, True) end end end
Packet : 117143167actor.rar filelist
Actor.pas