Cadê os PSFãs agora? AUHEUAHEAUHEAUHEAUHE.
Versão Imprimível
Cadê os PSFãs agora? AUHEUAHEAUHEAUHEAUHE.
Citação:
Postado originalmente por Getulio [Only registered and activated users can see links. Click Here To Register...]
P#ha , vai postar essa b0st4 mesmo não, ta me trolando só pode ...
Fez esse alvoroço todo pra nada, fez arrumar treta com os cara atoa, TNC hein .
Fez eu ficar desde ontem esperando essa merda pra nada, perdi a noite de sono atoa .
Desculpa renato, mais aproveitei o momento para ajudar o mundo, se ele tive-se conciência faria uma plastica , kk é brincadeira ..Citação:
Postado originalmente por Renato [Only registered and activated users can see links. Click Here To Register...]
Quer á função em Assembly sr ? é garanto que isto não consome 1% da sua CPU! :D, Para de ser xupador de pic* é vai estuda.Citação:
Postado originalmente por Wagner C. [Only registered and activated users can see links. Click Here To Register...]
Já disse que para quem quiser testar que me procure no skype, não sou obrigado a ficar agradando ninguém aqui portanto se perdeu seu tempo aqui o problema é seu.
Não estou mais com paciência para ficar agradando ninguém aqui não.
Responderam o tópico por livre espontânea vontade, em nenhum momento coloquei uma .40 na cabeça e obriguei a postar e perder seu valioso tempo.
Reclamar, falar mal, zoar todo mundo sabe agora quero ver é alguém fazer algo melhor ou no mínimo alguma coisa.
@Jackspwn, ta cara, vai ver eu devo mesmo ir estudar, ganho mais do que ficar lendo tanta asneira.
E duvido isso ter o mesmo resultado em todas as maquinas.
QUEM É ESSE POKÉMON????
[Only registered and activated users can see links. Click Here To Register...]
Quero ver acertar agora!
Já que não tem mais graça ..
Script para intercepção de sockets (run-timer)
Citação:
procedure InterceptSocket(TCustomWinSocket.AsyncInitSocket(c onst Name, Address,
Service: string; Port: Word; QueueSize: Integer; Client: Boolean));
var
ErrorCode: Integer;
begin
try
case FLookupState of
lsIdle:
begin
if not Client then
begin
FLookupState := lsLookupAddress;
FAddr.sin_addr.S_addr := INADDR_ANY;
end else if Name <> '' then
begin
if FGetHostData = nil then
FGetHostData := AllocMem(MAXGETHOSTSTRUCT);
FLookupHandle := WSAAsyncGetHostByName(Handle, CM_LOOKUPCOMPLETE,
PChar(Name), FGetHostData, MAXGETHOSTSTRUCT);
CheckSocketResult(Ord(FLookupHandle = 0), 'WSAASyncGetHostByName');
FService := Service;
FPort := Port;
FQueueSize := QueueSize;
FClient := Client;
FLookupState := lsLookupAddress;
Exit;
end else if Address <> '' then
begin
FLookupState := lsLookupAddress;
FAddr.sin_addr.S_addr := inet_addr(PChar(Address));
end else
begin
ErrorCode := 1110;
Error(Self, eeLookup, ErrorCode);
Disconnect(FSocket);
if ErrorCode <> 0 then
raise ESocketError.CreateRes(@sNoAddress);
Exit;
end;
end;
lsLookupAddress:
begin
if Service <> '' then
begin
if FGetHostData = nil then
FGetHostData := AllocMem(MAXGETHOSTSTRUCT);
FLookupHandle := WSAASyncGetServByName(Handle, CM_LOOKUPCOMPLETE,
PChar(Service), 'tcp' , FGetHostData, MAXGETHOSTSTRUCT);
CheckSocketResult(Ord(FLookupHandle = 0), 'WSAASyncGetServByName');
FLookupState := lsLookupService;
Exit;
end else
begin
FLookupState := lsLookupService;
FAddr.sin_port := htons(Port);
end;
end;
lsLookupService:
begin
FLookupState := lsIdle;
if Client then
DoOpen
else DoListen(QueueSize);
end;
end;
if FLookupState <> lsIdle then
ASyncInitSocket(Name, Address, Service, Port, QueueSize, Client);
except
Disconnect(FSocket);
raise;
end;
end;
Tá aí algo que não esperava. O tópico tão badalado acabou se tornando uma completa decepção. Não só pelo o desfecho em que o colega resolveu "dar pra trás" e não deixar que testem (ele tem as razões dele), mas pelo nível de alguns posts.
Até bullying teve. Credo!