Unit Dialogsel |
*****************************************************************) (* Copyright 1997,1998, Merkes' Pages (Markus Stephany) *) (* Email: mirbir.st@t-online.de/mirbir.st@saargate.de *) (* Web-page: http://home.t-online.de/home/mirbir.st/ *) (* *) (* This program was written in Borland Delphi 3 (and should be *) (* fully compatible with Delphi 2 (I hope it !). *) (* *) (******************************************************************) { this is a part of the modified version of ZipSfx. initially, zipsfx has been written by : (******************************************************************) (* ZipSFX *) (* Copyright 1997, Carl Bunton *) (* Home of ZipTV compression components for Delphi *) (* Email: Twojags@cris.com *) (* Web-page: http://www.concentric.net/~twojags *) (******************************************************************) the first modifications came from Eric W. Engler englere@swcp.com he is the creator of the powerful freeware zip-vcl delzip for delphi 2? and 3. now i am trying to make the code a bit more sfx-creator- and sfx-user- friendly, and i must say, eric is a very hard beta-tester :).
Classes |
Functions |
executecmd - reads the special header (s.
getarg - execute the command-line read from the special header, if any
to draw a imagelist-image on a hdc
getdefaultparams - messagebox(0,pchar(sr2),pchar(sr1),0);
newdirProc - --------------------------------------------------------------------------*) (*--------------------------------------------------------------------------*) (* newdirProc --- Handle messages for add subdir dialog.
seldialogProc - --------------------------------------------------------------------------*) (* selDialogProc --- Handle messages for select dir dialog.
Types |
Constants |
cm_browse
cm_group
cm_lbshow
cm_runapp
Variables |
allowdcl
allowsel
caption
commandline
defovm
hideovm
seldir
storedpath
usecap
usecl
usesp
Functions |
get the short (8+3)-filename (it seems that shellexecute has some problems with lfn
to draw a imagelist-image on a hdc
Types |
Constants |
Variables |