[Resolvido] Bloquear Navegador

[Marostegan 0]

alguem sabe como criar um bloqueador de sites? um sisteminha q só deixe abrir sites que eu quero?

 

 

obrigado

[marcio.theis 3]

Já desenvolvi um, bem simples, mas funciona somente integrado com o IE, se lhe interessar, posso colocar na seção de artigos do fórum.,..

[Marostegan 0]

Já desenvolvi um, bem simples, mas funciona somente integrado com o IE, se lhe interessar, posso colocar na seção de artigos do fórum.,..

olá amigo, td bem? (desculpa a demora pra responder, correria com a faculdade)

 

então, interessa sim... eu preciso só bloquear o IE msm! você poderia passar pra mim? caso sim fala o link...

 

muito obrigado!!

 

 

e bom final de semana!!

 

abraços http://forum.imasters.com.br/public/style_emoticons/default/natal_w00t.gif

[marcio.theis 3]

Pode ver neste link

[Marostegan 0]

Pode ver neste link

poxa cara, muito legal... funcionou direitinho!!

 

mas será que tem como fazer o seguinte:

 

ao inves de deixar tudo liberado e só bloquear o que eu kero, teria como fazer ao contrário?

 

ele bloquear todos os sites... só deixar abrir aqueles que eu liberar?

 

 

 

(desculpa o monte de pergunta.. é que delphi não é mto minha praia e eu preciso fazer isso funcionar senaum sabe como é né... agente roda! =/ )

 

obrigado...

 

abraços

[marcio.theis 3]

Tem sim, basta você mexer no programa, fazendo com que ele verifique pelas palavras que você permitir o acesso, o restante fecha tudo...

[Marostegan 0]

Tem sim, basta você mexer no programa, fazendo com que ele verifique pelas palavras que você permitir o acesso, o restante fecha tudo...

 

entendi... + você poderia me falar como eu faço isso? eu não tenho nem idéia de onde começa... onde mexer... http://forum.imasters.com.br/public/style_emoticons/default/natal_sad.gif

[marcio.theis 3]

?

 

No momento sem tempo suficiente para fazer a alteração... http://forum.imasters.com.br/public/style_emoticons/default/natal_smile.gif

[Marostegan 0]

tudo bem! =D obrigado...

 

tpw... eu posso colocar o código aqui no forum pra ve se alguem pode me ajudar? você deixa?

[marcio.theis 3]

Claro, sem problemas...

[Marostegan 0]

hummm... obrigado!

 

e desculpa o monte de perguntas!! rss...

[marcio.theis 3]

hummm... obrigado!

 

e desculpa o monte de perguntas!! rss...

 

Sem problemas... :D

 

Se final de semana der tudo certo, vou mexer no programa para você...

[Marostegan 0]

poxa cara... brigadao msm!

 

é que delphi num é minha praia, e se sabe como é quando você precisa fazer uma coisa né... ;/

 

complicado... mais obrigado pela força ae!

[marcio.theis 3]

Olhei os fontes aqui...

Você precisa mudar somente em dois locais, mudando valor das variáveis, na linha 39 troque:

ret:=False; para ret:=True;

E na linha 48 troque:

ret:=True; para ret:=False;

 

Ficando:

 

function BloqueiaURL(url: string): boolean;
var
	ret: boolean;
	x: integer;
	strTemp: string;
begin
//Faz a comparação da url com as palavras q são proibidas
ret:=True;
strTemp:='';
for x:=1 to Length(palavrasBloqueia) do
	begin
	if ((palavrasBloqueia[x] = ',') or (x = Length(palavrasBloqueia))) then
		begin
		strTemp:=Trim(strTemp);
		if Pos(strTemp,url) > 0 then
			begin
			ret:=False;
			Break;
			end
		else
			strTemp:='';
		end
	else
		strTemp:=strTemp + palavrasBloqueia[x];
	end;
BloqueiaURL:=ret;
end;

[Marostegan 0]

poxa caraa... brigadaum mesmoooo!!!!!!

 

=DDDD

 

deu certinho aqui, agora tah funfanooo!!!!

 

valewss!!

 

abraçosss...

[marcio.theis 3]

beleza... :D