Basic

Unter Hardcopy steht Ihnen ein leistungsfähiger Basic-Interpreter zur Verfügung.

Nachfolgendes Beispiel zeigt die Anwendung des Basic-Interpreters aufgrund einer Anwenderfrage.
FAQ: 822: Kann man das Programm veranlassen das es einen Text (Vertraulich, usw.) quer über das Blatt stempelt.

text = " Vertraulich / Top Secret "
Font.Bold = TRUE
Font.Color = _ColorPink
Font.Name = "Courier New"
Font.Size = Image(0).Width / Len( text ) * 2
Font.Orientation = RadToDeg( ATan( Image(0).Height / Image(0).Width ))
Image(0).DrawText( 0, Image(0).Height-Font.Size, 0,0, text )

Das Ergebnis:



Nachfolgend eine kurze Übersicht der Anweisungungen und Funktionen.

Anweisungen:
Dim
If ... Then ... Else ... EndIf
For ... To ... Step ... Next
Do ... Loop
While ... Wend
Goto
Sub
End
Print
Input
Dialog
Beep

Funktionen:
Sqr
Hypot
Abs
Sin
Cos
Tan
ATan
ASin
ACos
ATan2
DegToRad
RadToDeg
Exp
Log
Log10
Len
InStr
Left
Right
Mid
LTrim
RTrim
Trim
UCase
LCase
IsInteger
IsFloating
IsString
AsInteger
AsFloating
AsString

Spezielle Hardcopy Erweiterungen:
Objekte:
File
Find
NumberOfElements
Name
Path
HcDate
Size
Time
Limit
NumberOfFiles
CurrentDirectory
Spezialverzeichnisse
WithDirectories
IsDirectory
Recursive
SortOrder
SortOnlyFiles
OnlyDirectories
CopyTo
CreateDirectoryByCopyTo
Delete
TestOnly
Open
Close
Read
Write
Font
Align
BkColor
BkModeOpaque
Bold
Color
Ellipses
Italic
Name
Orientation
Size
StrikeOut
Underline
Image
AddBorder
Bending
Color
CopyToClipboard
Delete
DrawImage
DrawImageWarp
DrawText
Ellipse
EllipseFill
GetVideo
GrayScale
Height
Line
MotionBlur
Open
PasteFromClipboard
PlaneBend
Punch
PutVideo
RadialBlur
RadWave 81
Rectangle
RectangleFill
Resample
Ripple
Rotate
Save
Spherize
Swirl
Trim
Width
ZoomBlur
Pen
Width
GradientMode
Color
StartColor
EndColor
StartCap
EndCap
DashStyle
StartTolerance
EndTolorance
Texture
Settings
NumberImagesVertical
NumberImagesHorizontal
NextNumber
Funktionen:
CloseInputVideo
CloseOutputVideo
CreateImage
GetImageCount
GetRValue / GetGValue / GetBValue
GetTime
GetVideoCompressor
HLStoRGB
OpenInputVideo
OpenOutputVideo
Redraw
RGB
Sleep



Letzte Änderung / Last update: 07.05.2024 16:22:00