Which folder has a list of the sample Xailer projects, with their descriptions? I'm specifically looking for ways of taking shapes like rectangles or triangles, and moving them around the form or canvas with the mouse and keyboard.
I tried some simple code with TShape, but it doesn't show anything. The object gets created, but it isn't visible.
Código: Seleccionar todo
METHOD GenerateShapes( oSender ) CLASS frm_TUIEmulation
Local Var_s := ""
Local Rectangle_shp
Rectangle_shp = TShape()
Rectangle_shp:nShapeType = stRECTANGLE
Rectangle_shp:lEnabled := .T.
Rectangle_shp:lVisible := .T.
Rectangle_shp:nClrLine := clBlack
Rectangle_shp:nClrPane := clPurple
Rectangle_shp:nHeight := 230
Rectangle_shp:nLeft := 480
Rectangle_shp:nLineWidth := 4
Rectangle_shp:nOpacity := 80
Rectangle_shp:nTop := 5
Rectangle_shp:nLeft := 5
Rectangle_shp:nVertices := 7
Rectangle_shp:nWidth := 222
Rectangle_shp:lFillShape := .T.
// ::frm_TUIEmulation:ReDraw(.T.)
::frm_TUIEmulation:Refresh(.T.)
// Temporary Breakpoint
Var_s := "XXXXX"
RETURN Nil
By the way, the Help for TShape is in Spanish. The rest of the Help file is English.