Delphi 元件設計初步 - 東吳大學資訊管理學系 unit Week; interface uses Windows, SysUtils, DsgnIntF, classes; type TWeekName = type Integer; TWeekNameProperty = class(TIntegerProperty) public function GetValue: string; override; procedure SetValue(const Value: string); override; end; implementation c
Delphi Challenge: Unique Random Number Generator - a Custom Delphi Function to Fill an Array with Un Challenge: Fastest Unique Random Number Generator Your challenge is to code a custom Delphi procedure with the following signature: procedure Randomizer(const maxValue : int64; var values : array of int64) ; Randomizer takes 2 parameters: values is an ...
MessageDlg - Delphi Function Upon Window Closure Answer the following question: MessageDlg is called and displays Yes and No buttons. User closes the dialog by clicking on the X button in the title bar. What is the result of the function? Here's a custom implementation of the MessageDlg Delphi function
Delphi 2010 | The Road to Delphi - a Blog about programming Here ‘s a sample code of how you can dump the declaration of a TRttiType using the Rtti. Supports classes, records and interfaces. Delphi //Author Rodrigo Ruz V. 2010-10-10 uses Rtti, TypInfo, Classes, Generics.Collections, SysUtils; function ...
Parameters (Delphi) - RAD Studio XE - Embarcadero Documentation Wiki About Parameters Most procedure and function headers include a parameter list. For example, in the header: function Power(X: Real; Y: Integer): Real; the parameter list is (X: Real; Y: Integer). A parameter list is a sequence of parameter declarations sep
Delphi Basics : Concat command Delphi Basics Concat Function Concatenates one or more strings into one string System unit function Concat ( const String1 {,String2 ...} : string ) : string; Description The Concat function concatenates (joins) strings String1, String2 ... together into
The Spirit of Delphi Not sure if anyone created(in delphi) something similar yet, which should indicate that it's usage is very limited, but here it goes... Ever played with huge arrays and you always have to copy chunks into smaller arrays which then you want to feed to some
Delphi tips - Martin Stoeckli - welcome File & path functions Often used file functions You don't remember exactly the functionname, but you know there was a function...? ExtractFileDrive, ExtractFilePath, ExtractFileName, ExtractFileExt (uses SysUtils) ExtractShortPathName, ExpandUNCFileName .
Dr.Bob's Delphi Clinic: Dr.Bob's Delphi Efficiency Optimisation including PDF to excel function FindIndex(RootNode: TOutLineNode; SearchName: TFileName): LongInt; var FirstChild,LastChild,TempChild: LongInt; begin FirstChild := RootNode.GetFirstChild; if (FirstChild = InvalidIndex) or (SearchName = items[firstchild].text) then FindIndex ...
efg's Delphi Math Functions: General Functions Function / Type Name Description Source(s) DoubleDeclining Balance Function DoubleDecliningBalance(Cost, Salvage: Extended; Life, Period: Integer): Extended; Depreciation using double-declining balance formula. math Financial Calculator The Financial ...