Navigation¶

• CP Solutions
• Startseite
  
  
  
• domizil+
  • Startseite
    
    
    
    

Globale Methoden

1. Alphanumerische
   • function Chr(i: integer): char
   • function CompareText(const S1, S2: string): Integer
   • function Copy(s: string; from, count: integer): string
   • function DecodeB64(aValue: string): string
   • function EncodeB64(aValue: string): string
   • function Explode(const cSeparator, vString: String): Array of String
   • function Implode(const cSeparator: String; const cArray: Array of String): String
   • function Length(S: string): Integer
   • function Pos(SubStr: String; s: string): string
   • function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string
   • procedure Finalize (const aArray: Array of String)
   • function FastCompareText (const S1, S2: string): Integer
   • function GetToken (const Text: String; const Delimiter: Char; const Position: integer): String
   • function HowManyToken(const Text: String; const Delimiter: Char): Integer
   • function StrToBool(Value: String): boolean
   • function BoolToStr(Value: Boolean): string
   • function Utf8Encode(const Value: String): String
   • function Utf8Decode(const Value: String): String
   • function QuotedStr(const S: string): string
   • function CopyFromClipboard: string
   • procedure CopyToClipboard(const value: string)
2. Datum, Zeit
   • function WeekOf(const AValue: TDateTime): Word
   • function MonthOf(const AValue: TDateTime): Word
   • function YearOf(const AValue: TDateTime): Word
   • function EndOfTheMonth(const AValue: TDateTime): TDateTime
   • function EndOfTheYear(const AValue: TDateTime): TDateTime
   • function EndOfTheWeek(const AValue: TDateTime): TDateTime
   • function DayOf(const AValue: TDateTime): Word
   • function DateOf(const AValue: TDateTime): TDateTime
   • function DayOfTheWeek(const AValue: TDateTime): Word
   • function DayOfTheWeekToString(const AValue: Integer): string
   • function EndOfAMonth(const AYear, AMonth: Word): TDateTime
   • function StartOfAMonth(const AYear, AMonth: Word): TDateTime
   • function IncMilliSecond(const AValue: TDateTime; const ANumberOfMilliSeconds: Longint = 1): TDateTime
   • function IncSecond(const AValue: TDateTime; const ANumberOfSeconds: Longint = 1): TDateTime
   • function IncMinute(const AValue: TDateTime; ANumberOfMinutes: Longint = 1): TDateTime
   • function IncHour(const AValue: TDateTime; const ANumberOfHours: Longint = 1): TDateTime
   • function IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime
   • function IncWeek(const AValue: TDateTime; const ANumberOfWeeks: Integer = 1): TDateTime
   • function IncMonth(const Date: TDateTime; NumberOfMonths: Integer = 1): TDateTime
   • function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer = 1): TDateTime
   • function DateToInteger(const Date: TDateTime): Integer
   • function IntegerToDate(const Date: Integer): TDateTime
   • function string_to_time(aStr: string; var aTimeStr: string; var aMinutes: Integer): boolean
   • min_to_string(aMinutes: Integer): string
   • function FormatDateTime(const Format: string; DateTime: TDateTime): string
   • function EncodeDate(Year, Month, Day: Word): TDateTime
   • procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word)
   • function IsLeapYear(Year: Word): Boolean
   • function DaysInMonth(const AValue: TDateTime): Word
   • function Easter(const iYear: Integer): TDateTime
3. Zahlen
   • function isinteger(st:string): boolean
     
   • function isfloat(st:string): boolean
     
   • function VarIsEmpty(const V: Variant): Boolean
     
   • function VarIsNull(const V: Variant): Boolean
     
   • function Power(const Base, Exponent: Extended): Extended
     
   • function RoundTo(const AValue: Double; const ADigit: Integer): Double
     
   • function Ceil(const X: Extended):Integer
     
   • function Floor(const X: Extended): Integer
     
   • function DoubleToStr (const Value: Double): string)
     
   • function CurrToStr (const Value: Currency): string)
     
   • function StrToCurr(const Value: String): Currency)
     
   • function StrToDouble(const Value: String): Double)
     
   • function IntToBool(aInt: Integer): boolean)
     
   • function BoolToInt(aBool: Boolean): Integer)
     
4. Dateien
   • procedure readClientFolder(aPath: string; aListView: TnetListView)
     
   • function ExtractFilePath(aFileName: string) : string
     
   • function ExtractFileName(aFileName: string) : string
     
   • function ExtractFileExt(aFileName: string) : string
     
   • function fileexists(aFileName: string): boolean
     
   • function directoryexists(aDir: string): boolean
     
   • procedure UploadFile(aServerPath, aFilename: string)
     
   • function RenameFile(const OldFile: String; const NewFile: String): boolean
     
   • function DeleteFile(const Filename: String): boolean
     
   • function DeleteDir(const Directory: String): boolean
     
   • function CreateDir(const Directory: String): boolean
     
   • function CopyFile(const OldFile: String; const NewFile: String): boolean
     
   • function SetFileReadOnly(const Filename: String; const ReadOnly: boolean)
     
   • function ShellExecute2(aFileName: string; aParams: string)
     
   • function PrintTiff(const FileName: string)
     
   • function PrintTiffEx(const FileName: string; const PrinterName: String)
     
5. Dialoge
   • function confirm_dlg(atext: string):integer
     
   • procedure message_dlg(atext: string)
     
   • function color_dlg(aOldColor:TColor): TColor
     
   • function Input_Query(const ACaption, APrompt:string; Var Value: string): boolean
     
   • function ExecEditorMailMerge(aTable: TRPCTable): Integer
     
   • function SelectRecord(aTable: TRPCTable; aSearchString, aSearchFields, aShowFields: string): Integer
     
   • function SelectRecord2(aTable: TRPCTable; aSearchString, aSearchFields, aShowFields: string; aPreSelectField, aPreSelectString: string): Integer
     
   • procedure printActiveDialog(ZoomPercent: Integer)
     
   • function select_multiple_dlg(aKeys, aValues, aSeparator, valuesCaption, valuesSelectedCaption: string; aQuoteResult: boolean; var aResultKeys: string; var aAllSelected: boolean): Integer
     
6. Allgemeine
   • function get_global_value(aName: string): Variant
     
   • function loadform(aName: string): integer
     
   • function findForm(const aName: string): Integer
     
   • procedure sendmail(aReceiver, aSubject, aBody: string)
     
   • procedure sendmail2(aReceiver, aSubject, aCopyTo, aBlindCopyTo, aBody: string)
     
   • procedure readdata(aTables: Variant)
     
   • function writedata(aTables: Variant): integer
     
   • procedure setglobal(aName: string; aValue: Variant)
     
   • function getglobal(aName: string): Variant
     
   • function getCompanyTable: TRPCTable
     
   • function newguid: string
     
   • function username: string
     
   • function userid: string
     
   • function primarygroupid: string
     
   • function primarygroupname: string
     
   • function systemdbfull: string
     
   • function stripped(Line: integer): boolean
     
   • function loadimageasbase64(ainitfolder: string; amaxsize:integer; var adata,aext: string): boolean
     
   • procedure base64topicture(apic: tfrxpictureview; aext, adata: string)
     
   • function RandomPassword(PLen: Integer): string
     
   • function RandomWord(dictSize, lngStepSize, wordLen, minWordLen: Integer): string
     
   • function loadRes(aValue: Variant): string
     
   • WriteIni - und ReadIniRoutinen im NetFrame
     
   • printReport2 - drucken mit einmaliger Druckaufforderung
     
   • CurrentUserHasPermission- Ermittlung der Userrechte
     
   • function CurrentUserIsInGroup :Boolean - Ermittlung der Gruppenzugehörigkeit
     
   • function ComponentCount : Integer - Ermittlung der Componenten eines Formulars oder Panels
     
7. System
   • procedure ShellExecute(aFileName: string)
     
8. Programm Ablauf
   • procedure Abort
     
   • function Addr (const Class: TObject): integer'
     
   • procedure RaiseLastException
     
   • function GetLastException: String
     
   • function GetLastExceptionClass: String
     
9. Varianten
   • function VarIsFilled(const V: Variant): Boolean
     
   • function VarIsError(const V: Variant): Boolean
     
   • function VarIsArray(const V: Variant): Boolean
     
   • function VarIsStr(const V: Variant): Boolean
     
   • function VarIsNumeric(const V: Variant): Boolean
     
   • function VarIsFloat(const V: Variant): Boolean
     
   • function VarIsEmptyParam(const V: Variant): Boolean
     
   • function VarArrayHighBound(const V: Variant; const Dim: Integer): Integer
     
   • function VarArrayLowBound(const V: Variant; const Dim: Integer): Integer
     
   • function VarToStr(const V: Variant): String
     
   • function VarToDateTime(const V: Variant): TDateTime
     
   • function VarArrayOf(const Values: array of Variant): Variant