yoga

A b*** da atualização matou meu Windows sem falar que esta dando erro ate .... Cara eu não vou usar essa b*** de Windows vou usar linux.

alguém por favor de uma luz sobre propriedades de atalhos, como crialos no menu iniciar, no desktop, as propriedades, o path da aplicação referente ao atalho. Gente qualquer coisa do genero.

Como faço para saber via programação em Delphi as configurações de rede, tipo Protocolo padrão de comunicação, IP, mascara, quais maquinas estão visivel ou disponivel na resde. Cara qualquer coisa com relação a programação e protocolos de comunicação.

Cara se fo o mesmo tópico desta cessão, eu dei uma olhada mas não encontrei a solução, encontrei apenas comentarios sobre o problema.

Cara eu queria resolver o problema sem ter que formatar pois acho que isso não resolve porque o dia que eu pegar o suposto virus novamente eu não terei uma solução.

Meu Windows quando eu conecto na internet ele da um erro no aplicativo SVCHOST.EXE e depois disso nada mais funciona como deveria funcionar ( como se o windows fosse perfeito ), eu clico nos links da internet e muitos não abrem, as teclas CRTL + C não funcionam mais, o painel de controle fica desconfigurado, etc, e quando eu reinicio o computador tudo volta a funcionar eta que eu conecte na internet. Obs: Quando eu conecto ele continua funcionando ums 15 minutos, ai sim ele da o erro e nada mais funciona, lembrando que eu intalei o norton atualizei e fiz a verificação de virus de nada foi encontrado eu ate formatei a partição do windows e reistalei tudo novamente, funcionou alguns dias mas já voltou a dar problemas. Como faço para resolver este problema no meu Windows 2000 Pro?

Como faço para saber e onde um atalho esta sendo executado. Como faço isso via programação no Delphi.

Tenta usar pacotes de ICMP que você tera as maquinas da rede.

Gente preciso de exmplos de como programar cliente servidor em Intebasic 6.x no delphi 6.x. Sou programador clipper e já trabalho com delphi e paradox. Ajudem por favor.

Caro amigo não entendi muito bem que que você quis dizer, mas...... Se você quer apreender a programar em delphi pega um bom livro de algoritimos voltados para delphi e um bom livro de pascal, que você vai aprender cerca de 70% de como desenvolver em delphi.

Cara uma ideira muito simples. Cria um arquivo xxxxx.xxx onde você armazena a data da primeira vez que você entrou no programa depois toda vez que você entrar no programa e so ir nesse arquivo e verificar se a diferença da data armazenada com a data atual e aceitavel. Isso tambem pode ser feito com o registro do Windows ao invés de arquivo. Essa e uma das maneira e tambem a mais simples. Espero ter ajudado. Duvidas mande um e - mail

Eu estava no trabalho quando encontrei um banco de dados que não copiava com xcopy, copy, ctrl+c, ctrl+v..., mas eu podia entrar e ver alguns registros. Pergunta como criar um arquivo que possa ser lido mas não possa ser copiado????????? Eu sei que essa e pra quem entende muito.

Eu preciso da sintax da API da DLL ICMP do windows ou seja preciso da API pra colocar no temporizador. Mas eu já consegui ma pagina da Microssoft, veja so: interface uses Windows, SysUtils, Classes; type TSunB = packed record s_b1, s_b2, s_b3, s_b4: byte; end; TSunW = packed record s_w1, s_w2: word; end; PIPAddr = ^TIPAddr; TIPAddr = record case integer of 0: (S_un_b: TSunB); 1: (S_un_w: TSunW); 2: (S_addr: longword); end; IPAddr = TIPAddr; function IcmpCreateFile : THandle; stdcall; external 'icmp.dll'; function IcmpCloseHandle (icmpHandle : THandle) : boolean; stdcall; external 'icmp.dll' function IcmpSendEcho (IcmpHandle : THandle; DestinationAddress : IPAddr; RequestData : Pointer; RequestSize : Smallint; RequestOptions : pointer; ReplyBuffer : Pointer; ReplySize : DWORD; Timeout : DWORD) : DWORD; stdcall; external 'icmp.dll'; function Ping(InetAddress : string) : boolean; implementation uses WinSock; function Fetch(var AInput: string; const ADelim: string = ' '; const ADelete: Boolean = true) : string; var iPos: Integer; begin if ADelim = #0 then begin // AnsiPos does not work with #0 iPos := Pos(ADelim, AInput); end else begin iPos := Pos(ADelim, AInput); end; if iPos = 0 then begin Result := AInput; if ADelete then begin AInput := ''; end; end else begin result := Copy(AInput, 1, iPos - 1); if ADelete then begin Delete(AInput, 1, iPos + Length(ADelim) - 1); end; end; end; procedure TranslateStringToTInAddr(AIP: string; var AInAddr); var phe: PHostEnt; pac: PChar; GInitData: TWSAData; begin WSAStartup($101, GInitData); try phe := GetHostByName(PChar(AIP)); if Assigned(phe) then begin pac := phe^.h_addr_list^; if Assigned(pac) then begin with TIPAddr(AInAddr).S_un_b do begin s_b1 := Byte(pac[0]); s_b2 := Byte(pac[1]); s_b3 := Byte(pac[2]); s_b4 := Byte(pac[3]); end; end else begin raise Exception.Create('Error getting IP from HostName'); end; end else begin raise Exception.Create('Error getting HostName'); end; except FillChar(AInAddr, SizeOf(AInAddr), #0); end; WSACleanup; end; function Ping(InetAddress : string) : boolean; var Handle : THandle; InAddr : IPAddr; DW : DWORD; rep : array[1..128] of byte; begin result := false; Handle := IcmpCreateFile; if Handle = INVALID_HANDLE_VALUE then Exit; TranslateStringToTInAddr(InetAddress, InAddr); DW := IcmpSendEcho(Handle, InAddr, nil, 0, nil, @rep, 128, 0); Result := (DW <> 0); IcmpCloseHandle(Handle); end; end. Mas muito OBRIGADO.

Preciso de um componente de ICMP ou mesmo um sistema que faz o monitoramento da rede. Que de 5 em 5 segundos me diga quem esta conectado. ****************URGENTE**************** OBRIGADO

Eu tenho uma maquina (servidor) com linux 8,0 e o samba configurado e outra com windows 98SE. Quando tento logar a maquina do win98 ele verifica a senha e depois ele da uma mensagem dizendo para verificar os compartilhamentos. Mas no smb.conf esta tudo certo. alguém pode me ajudar.

No site scriptbrasil eu coloquei um arquivo que contem 85% as APIS o windows, 95, 98 xp, 2000, nt etc. Da uma olhada la talvez ajude. Espero ter ajudador

procedure CopyDir(const cFrom, cTo : string); var OpStruc : TSHFileOpStruct; frombuf, tobuf : array[0..128] of Char; begin FillChar(frombuf, Sizeof(frombuf), 0); FillChar(tobuf, Sizeof(tobuf), 0); StrPCopy(frombuf, cFrom); StrPCopy(tobuf, cTo); with OpStruc do begin Wnd := Application.Handle; wFunc := FO_COPY; pFrom := @frombuf; pTo := @tobuf; fFlags := FOF_NOCONFIRMATION or FOF_RENAMEONCOLLISION; fAnyOperationsAborted := False; hNameMappings := nil; lpszProgressTitle := nil; end; ShFileOperation(OpStruc); end; Tenta esta procedure que vai te ajudar.

Coloca um RadioGroup no form1 e quando tiver fechando o form1 você verifica qual form esta marcado, veja: Coloque um botão para fechar o form1 no OncliK if RadioGroup1.ItemIndex <> -1 then begin form1.close end No onclose do form1 coloque: if RadioGroup1.ItemIndex = 0 then begin form2.show; end if RadioGroup1.ItemIndex = 1 then begin form3.show; end if RadioGroup1.ItemIndex = -1 then begin showmessage("escolha uma opção") end

Eu já consegui. Se alguém quiser e so me procurar no ........

Queria um exemplo de codigo em delphi onde eu conto quantos arquivos de extenção ZIP tem e deleto os 5 mais antigos. Se alguém pude me ajudar.

Se você procurar no GOOGLE vai achar, mas no site: www.clubedodelphi.com.br tem alguns exemplos que talvez possa te ajudar

Se você quiser rodar um programa feito em clipper no linux basta você procurar sobre Xharbour ou Harbour e sobre o DOS-EMU do linux. Cara eu trabalho com clipper e delphi e estou convertendo um programa clipper que roda em windows para rodar em linux, pensa nas possibilidades... Eu converto o programa de clipper para C++ e depois compilo para linux, ate agora esta tudo bem estou rodando um pequeno programa em clipper no linux sem problemas agora vou tentar rodar ele em rede no linux com todas as maquinas rodando linux. Quanto uma empresa pode pagar por uma tecnologia tão barata. Em termos de maquinas ela não gastara nada pois um PC 166 roda linux muito bem, já que ela não gasta nada podemos cobrar mais em termos de tecnologia, sem falar que os programas feitos em clipper se tornariam mult - plataforma e ganhariam um novo mercado inesplorado.

Como posso configurar o conectiva 8.0, modo texto para logar maquinas em rede com Win98. Tutoriais em portuques seria um bom começo. Obrigado.

Se você usa o Win 98 la na guia acessorios tem um programa desses so que ele deve estar aberto na maquina de destino. No Win 200 tem outro em ferramentas admnistrativas no painel de controle so que se você não tiver conhecimento, vai ser dificil configurar. Espero ter ajudado.