These components have demo applications which act as terminals with full duplex capability. See: http://www.torry.net/authorsmore.php?id670 http://www.torry.net/pages.php?id8 http://sourceforge.net/projects/tpapro/ …
Online Embarcadero Delphi reference
Useful!!! http://docwiki.embarcadero.com/RADStudio/XE6/en/Delphi_Reference http://docwiki.embarcadero.com/Libraries/XE6/en/System.TObject
Get Bluetooth com in delphi
function GetBlutoothComPort: String; var S, S1: String; Item: Integer; Reg: TRegistry; KeyList1, KeyList2: TStringList; begin Reg := TRegistry.Create; …
Borlad database engine errors
BDE Error list: $0000 (0) = Successful completion. $0021 (33) = System Error $0022 (34) = Object of …
Download a file from Internet
{1.} uses URLMon, ShellApi; function DownloadFile(SourceFile, DestFile: string): Boolean; begin try Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0; except Result := False; end; end; procedure TForm1.Button1Click(Sender: TObject); const // URL Location SourceFile = ‘http://www.google.com/intl/de/images/home_title.gif’; // Where to save the file DestFile = ‘c:tempgoogle-image.gif’; begin …
Copy a file
{ The CopyFile function copies an existing file to a new file. CopyFile( lpExistingFileName : PChar, // name of an existing file lpNewFileName : PChar, // name of new file bFailIfExists : Boolean); // operation if file exists bFailIfExists: Specifies how this operation is to proceed if a file of the same name as that specified by lpNewFileName already exists. If this parameter is TRUE and the new file already exists, the function fails. If this parameter is FALSE and the new file already exists, the function overwrites the existing file and succeeds. } var fileSource, fileDest: string; begin fileSource := ‘C:SourceFile.txt’; fileDest := ‘G:DestFile.txt’; …
