Unit Miscutil

******************************************************************} { MiscUtil Unit. Lots of useful functions/procedures } { Copyright (C) 1996-1997 by Artem A. Berman } { N o t f o r d i s t r i b u t i n g. } { } {

Classes

Functions

BuildDirectoryFileList -
BuildFullFileName -
CodeString -
ColorToStr -
Empty -
ExtractFileDriveChar -
ExtractFileDriveString -
FileLZCopy -
FontToStr -
JustFileName -
PosFromPos -
SetActiveApp - Mines from here
StrToColor - Next five are copyright (c) by Stefan Boether <100023.
StrToFont -
StrToken -
WCharToString -

Types

Constants

Variables


Functions


function BuildDirectoryFileList(FDirectory, Filter: string; FOnlyNames: Boolean): TStringList;


function BuildFullFileName(FName: TFileName): TFileName;


function CodeString(WhatArray: string; Sym: Byte): string;


function ColorToStr(Item: TColor): string;


function Empty(ss: string): Boolean;


function ExtractFileDriveChar(FPath: TFileName): Char;


function ExtractFileDriveString(FPath: TFileName): TFileName;


function FileLZCopy(fSource, fDest: PChar): Boolean;


function FontToStr(Value: TFont): string;


function JustFileName(FName: TFileName): TFileName;


function PosFromPos(SubStr, MainStr: string; Posit: Integer): Integer;


function SetActiveApp(FCaption: PChar): Boolean;

Mines from here

function StrToColor(const Item: string): TColor;

Next five are copyright (c) by Stefan Boether <100023.275@compuserve.com>

function StrToFont(const Item: string): TFont;


function StrToken(var s: string; Seperator: Char): string;


function WCharToString(AValue: Array of WCHAR): string;


Types


Constants


Variables