Monthly Archives: March 2011

How to change a licence number in all AVG clients

If you would like to change a license number for all computers in the network, please do the following: Run AVG Admin Console. From the left navigation tree select Licenses -> Shared settings. Double-click “Shared settings” option in the Shared settings area. Fill the new license number and press Enter key. Right-click the “Shared settings”… Read More »

Creating PDFs from PHP

http://www.fpdf.org/ (Used on PTI and JMS) http://www.ros.co.nz/pdf/ Never used, but looks interesting.

Category: PHP

WordPress – Increasing maximum upload size

<VirtualHost *:80> DocumentRoot  “/blah/blah/blah” ServerName    www.blahblahblah.net ServerAlias   blahblahblah.net ServerAdmin   webmaster@blahblahblah.net CustomLog     logs/access/www.blahblahblah.net.log combined ErrorLog      logs/error/www.blahblahblah.net.log # if upload_max_filesize and post_max_size are NOT the same WordPress # will set the maximum upload limit to the lower of the two values. # This was the case with WordPress 3.1 on 21st March 2011 php_value      upload_max_filesize 25M php_value     … Read More »

How to Sort a ListView

When you are working with a TListView component and want to sort the items based on a custom criteria, you can use the following idea… Suppose you have assigned numbers for the TListItem Caption property and need to sort the ListView when displayed in a report-style. To use custom sorting handle the OnCompare event. If… Read More »

Talisman : Invalid use of Null

You’ve probably manually copied a workstation record in the SQL database to get around the WORKSTATION NOT REGISTERED message. You need to go into System -> Network -> Workstations, find the new record, open it, save it and it should work.

JFDI

JFDI – My new favourite acronym!

Require a password login into your Delphi Application

unit login; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TLoginForm = class(TForm) LogInButton: TButton; pwdLabel: TLabel; passwordEdit: TEdit; procedure LogInButtonClick(Sender: TObject) ; public class function Execute : boolean; end; implementation {$R *.dfm} class function TLoginForm.Execute: boolean; begin with TLoginForm.Create(nil) do try Result := ShowModal = mrOk; finally Free; end;… Read More »

ADSL checks

http://www.samknows.com/ http://www.speedtest.net/ http://www.speedtester.bt.com/ http://www.bbc.co.uk/iplayer/diagnostics http://www.vwlowen.co.uk/internet/files.htm – Monitoring software

Delphi & Crystal Reports – Steves way

Choose Type Library “Crystal Report Control” (version 5.2 on my system) – CRYSTL32.OCX Gives me TCrystalReport If you get a complaint during compling saying it can’t find Crystal_TLB go to the PROJECT OPTIONS, click Delphi Compiler then add “E:\My Programs\Delphi2010\[packages]\TCrystalReport” to Search Path.

Using Automation with Crystal Reports and Delphi

In order to use the automation features in Crystal Reports 8.0 and higher, you must first import the type libraries into Delphi. 1. From the Delphi IDE main menu, go to Project | Import Type Libary. 2. Highlight ‘Crystal Report 8 Active X Designer Run Time Libary’. 3. In the Class Names box, change the… Read More »

Kix Script – kixtart.kix

include “functions.kix” $startTime = @Ticks $welcome = “Weclome to @Domain, @Fullname (@WkSta)” SetTitle($welcome) cls COLOR W+/n ? $welcome /************************************************** ** ** Mapping network drivers ** **************************************************/ COLOR Y+/n ? ? “Mapping drives” ? “————–” map_drive(“S:”, “\\econel\shared”) map_drive(“T:”, “\\econel\talisman”) /************************************************** ** ** Sync workstations times with cadserv for ** Teamwork software to work. ** **************************************************/ COLOR… Read More »

Kix script – functions.kix

Function map_drive($drive_letter, $unc) COLOR W+/n ? “Mapping $drive_letter to $unc” USE $drive_letter /del /persistent USE $drive_letter “$unc” If @ERROR == 0 COLOR G+/n ? ” Connection succesful” Else print_error(@Error, @SError) EndIf EndFunction Function print_error($errorno, $errorstr) COLOR R+/n ? ” Error $errorno – $errorstr” EndFunction Function connect_printer($unc) COLOR W+/n ? “Connecting to $unc” If ADDPRINTERCONNECTION ($unc)… Read More »