Fórum Lan House / Cyber Cafe #138383
19/02/2003
0
Alguem tem ou sabe onde encontro alguns exemplos de software para lan house com codigo fonte?
Preciso fazer algo bem resumido, sem muitos recursos.
Basicamente é contar tempo e travar e destravar maquina cliente.
Vou usar Windows XP
Valeu
Anonymous
Curtir tópico
+ 0Posts
19/02/2003
Anonymous
Eu vendo.
Se tiver interesse : 500,00 em deposito bancario. Se voce quiser ver a apresentação do sistema posso te enviar por email!
Gostei + 0
19/02/2003
Anonymous
Eu estou querendo fazer algo parecido, não tenho autorização para a compra de um software, mas muito obrigado pela sua atenção.
Acho que este canal é para ajudarmos uns aos outros em nossos problemas, e não para comercialização, até entendo o seu ponto de vista, já que passou horas desenvolvendo e isso não questiono, pois é mais que justo cobrar pelo serviço.
Mas mesmo assim, vou continuar com minhas pesquisas, eu nao quero nada pronto para uso, preciso só de umas funcoes basicas para controlar o lock e unlock de clientes que o resto eu me viro.
Se não puder ajudar, eu entendo.
Abraços
Gostei + 0
19/02/2003
Anonymous
Pode ser?
Eu quero!
Gostei + 0
19/02/2003
Nildo
Começa fazendo. Em vez de achar um pronto, comece fazendo. Se não tem idéia de onde começar, comece pela estrutura do banco de dados
Gostei + 0
19/02/2003
Oriundo
Gostei + 0
19/02/2003
Anonymous
[img:1cf727c269]http://www.editcnc.com/steve/girdance.gif[/img:1cf727c269]
Gostei + 0
20/02/2003
Anonymous
Gostei + 0
20/02/2003
Anonymous
[img:f5553a338b]http://www.editcnc.com/steve/girdance.gif[/img:f5553a338b]
Gostei + 0
20/02/2003
Anonymous
Gostei + 0
20/02/2003
Anonymous
Se depositar 50 conto na conta eh seu o codigo fonte e prg e suporte.
dicipulofer@bol.com.br
Um abraco.
Gostei + 0
20/02/2003
Nildo
Nossssa.... que dificil hein ??????????? Isso é uma coisa muito simples de fazer. (pelo menos pra mim é). Se alguem quiser saber como ele barra o programa (processo) da memória, me avise que eu digo, e ainda coloco o código fonte (de graça)
Gostei + 0
20/02/2003
Anonymous
:lol: :lol: :lol:
e de qq forma agradeço
Falô
Gostei + 0
20/02/2003
Nildo
function Kill(ExeFileName: string): Integer;
const
PROCESS_TERMINATE = $0001;
var
ContinueLoop: BOOL;
FSnapshotHandle: THandle;
FProcessEntry32: TProcessEntry32;
begin
Result := 0;
FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
FProcessEntry32.dwSize := SizeOf(FProcessEntry32);
ContinueLoop := Process32First(FSnapshotHandle, FProcessEntry32);
while Integer(ContinueLoop) <> 0 do
begin
if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) =
UpperCase(ExeFileName)) or (UpperCase(FProcessEntry32.szExeFile) =
UpperCase(ExeFileName))) then
Result := Integer(TerminateProcess(
OpenProcess(PROCESS_TERMINATE,
BOOL(0),
FProcessEntry32.th32ProcessID),
0));
ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32);
end;
CloseHandle(FSnapshotHandle);
end;
//***********************************************
Agora teste: Kill(´delphi32.exe´)
Gostei + 0
20/02/2003
Anonymous
Gostei + 0
20/02/2003
Nildo
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)