Sistema
function
ADOPegaDataSource(connectionstring:string):string; (1.2)
Retorna o parâmetro Data Source de uma ConnectionString
function
pegaBiosData:string; (1.2)
Retorna a data da Bios
function
MudarWallpaper(arquivo : String; Tile : boolean ):boolean; (1.2)
Muda o papel de parede do Windows. O parâmetro Tile especifica
se este deverá ser exposto centralizado (false) ou lado a lado
(true). Em caso de erro, a função retornará o valor
false.
function
pegaFontesDir:string; (1.2)
Retorna o diretório em que as fontes do Windows se encontram instaladas.
function
mudaDesktop(diretorio:string):boolean; (1.2)
Muda o diretório da Área de Trabalho do Windows,
retornando false em caso de erro.
function
pegaDesktop:string; (1.2)
Retorna o diretório da Área de Trabalho do Windows.
function
mudaFavoritos(diretorio:string):boolean; (1.2)
Muda o diretório de armazenamento dos favoritos do Windows, mas
sem copiar o seu conteúdo para a nova pasta. Retorna false em caso
de erro
function
pegaFavoritos:string; (1.2)
Retorna o diretório de armazenamento dos Favoritos do Windows
function
ArquivoTipo(arquivo:string):string; (1.2)
Retorna o tipo do arquivo especificado (p. ex: aplicativo, DLL, etc)
function
ArquivoNomeDos(arquivo:string):string; (1.2)
Retorna o nome do arquivo em modo MS-DOS
function
ArquivoUltimaModificacao(arquivo:string):tdatetime; (1.2)
Retorna a data da última modificação (write) do arquivo.
function
ArquivoUltimoAcesso(arquivo:string):tdatetime; (1.2)
Retorna a data em que o arquivo especificado foi acessadopela última
vez.
function
ArquivoVersao(arquivo:string):string; (1.2)
Retorna uma string contendo o núemero de versão do arquivo.
Caso este não esteja disponível, retornará uma string
vazia.
function
ArquivoDataCriacao(arquivo:string):tdatetime; (1.2)
Retorna a data de criação de um arquivo.
function
InternetAtiva: Boolean; (1.2)
Verifica se a conexão com a Internet está ativa.
function
ADOCompact(origem:string;destino:string):boolean; (1.1)
Compacta um banco de dados Access utilizando ADO. Será criada uma
cópia compactada do arquivo origem na variável destino.
Caso tenha sucesso, esta função retornará o valor
true.
Exemplo:
function
ADOCompact('c:\db.mdb','c:\db.compactado'); (1.1)
function ADOCompactReplace(arquivo:string):boolean;
Compacta um banco de dados Access sem criar uma cópia de backup.
Com isto, o arquivo anterior será simplesmente substituído
pelo novo arquivo já compactado.
Exemplo:
function
ADOCompactReplace('c:\db.mdb');
function ADOVersao:
real;
Retorna a versão da biblioteca ADO caso esta esteja instalada no
sistema. Caso contrário, retornará o valor 0.0.
Exemplo:
var
ado:real;
begin
ado:=ADOVersao;
function
SysWinDir: string;
Retorna o diretório do Windows (normalmente C:\Windows)
function
SysTempDir: string;
Retorna o diretório temporário do sistema (normalmente C:\Windows\Temp
para as versões anteriores à 2000)
function
SystemDir: string;
Retorna o diretório de sistema do Windows (normalmente C:\Windows\System
para versões anteriores à 2000 e C:\Windows\System32 para
versões baseadas na tecnologia NT)
function
NumeroSerieRede(const Drive: Char; Path: PChar = nil): Cardinal;
Retorna o número de série de um disco presente em uma rede.
O não preenchimento do parâmetro Path implica ser este um
drive local.
Exemplo:
function
NumeroSerieRede('c','//computador//c'):Cardinal;
function NumeroSerieLocal(Unidade:PChar):String;
Retorna o número de série de um disco local
Exemplo:
function
NumeroSerieLocal('c'): Cardinal;
function PorcentoLivre(unidade:
byte): Integer;
Retorna a porcentagem de espaço livre em um disco.
|