Jhonas

Sim.... se qualquer componente não for compatível com a versão do delphi ele vai dar erro .. nesse caso voce pode trocar o componente, mantendo o código abraço

veja nesses links https://www.google.com.br/webhp?sourceid=chrome-instant&ion=1&espv=2&ie=UTF-8#q=rastrear ip abraço

DIRETIVAS DOS COMPILADORES {$IFDEF VER40} - Turbo pascal 4 {$IFDEF VER50} - Turbo pascal 5 {$IFDEF VER55} - Turbo pascal 5.5 {$IFDEF VER60} - Turbo pascal 6 {$IFDEF VER70} - Borland pascal 7 (And turbo pascal 1.5 for windows) {$IFDEF VER80} - Delphi 1 {$IFDEF VER90} - Delphi 2 {$IFDEF VER100} - Delphi 3 {$IFDEF VER120} - Delphi 4 {$IFDEF VER130} - Delphi 5 {$IFDEF VER140} - Delphi 6 {$IFDEF VER150} - Delphi 7 {$IFDEF VER160} - Delphi 8 {$IFDEF VER170} - Delphi 2005 {$IFDEF VER180} - Delphi 2006 {$IFDEF VER180} - Delphi 2007 {$IFDEF VER185} - Delphi 2007 {$IFDEF VER200} - Delphi 2009 {$IFDEF VER210} - Delphi 2010 {$IFDEF VER220} - Delphi XE {$IFDEF VER230} - Delphi XE2 {$IFDEF VER240} - Delphi XE3 {$IFDEF VER250} - Delphi XE4 {$IFDEF VER260} - Delphi XE5 {$IFDEF VER265} - Appmethod 1.0 {$IFDEF VER270} - Delphi XE6 {$IFDEF VER280} - Delphi XE7 {$IFDEF VER290} - Delphi XE8 {$IFDEF VER300} - Delphi 10 Seattle {$IFDEF VER310} - Delphi 10.1 Berlin Mais Informações http://docwiki.embarcadero.com/RADStudio/Berlin/en/Compiler_Versions http://docwiki.embarcadero.com/RADStudio/Berlin/en/Conditional_compilation_(Delphi) OBS: voce ira notar que essa versão é compativel com o delphi XE2 mas voce pode tentar usar outras diretivas para fazer um teste na compilação do projeto abraço

testei o seu projeto e esta funcionando como deveria abraço

voce encontra muito material na net https://www.google.com.br/?gws_rd=ssl#q=criar+dll+delphi https://www.google.com.br/?gws_rd=ssl#q=usar+dll+delphi+em+php obs: tem varios links com exemplos abraço

manda o projeto no email que te passei por MP

esse componente vai mostrar o icone da sua aplicação na barra de tarefas do windows na propriedade Icon voce coloca o icone que voce quer que apareça na barra de tarefas na propriedade Hint voce coloca o nome do seu programa e na propriedade active voce deixa como true ao executar o programa o icone vai aparecer na barra de tarefas, mesmo ele não estando minimizado use tambem o componente PopupMenu1 da aba Standard junto com o RXTrayIcon para que voce possa maximizar o seu programa novamente abraço

como disse, tem um exemplo pronto na pasta Demos do Delphi ... o FishFact.pas apesar desse exemplo estar usando o Paradox, é só trocar o banco de dados pelo interbase na sua tabela basta criar um campo tipo Blob e usar os códigos que te passei nos exemplos no form voce usa o componente TImage ou DBImage tem muitos outros exemplos na net https://www.google.com.br/?gws_rd=ssl#q=dbimage+delphi+jpg videos sobre o assunto https://www.google.com.br/search?q=dbimage+delphi+jpg&biw=1024&bih=644&também=vid&source=lnms&sa=X&ved=0ahUKEwiD_5zhrYzPAhXMgZAKHZmuDTUQ_AUICigD&dpr=1 abraço

ok... agora entendi o seu problema é o mesmo que ocorreu nesse Tópico ... leia todos os Posts use o componente RXTrayIcon da RXLib que resolve esse problema abraço

ainda não entendi onde está o problema ... a sua tela está escura ... é esse o motivo ?

não entendi o problema... ao minimizar o form, ele deve ficar no canto inferior esquerdo ou pode tentar assim frmLogin.WindowState := wsMinimized; OBS: voce deve postar as suas dúvidas no forum principal ( Delphi, Kylix ) O forum Tutorias & Dicas é somente para códigos prontos ... ok ? abraço

tente esse post do forum ou veja nesses links https://www.google.com.br/?gws_rd=ssl#q=serial+fisico+do+hd+delphi abraço

exemplos http://showdelphi.com.br/como-salvar-uma-imagem-jpg-no-banco-de-dados-dica-delphi/ http://showdelphi.com.br/como-recuperar-uma-imagem-jpg-contida-em-um-campo-blob-dica-delphi/ http://www.planetadelphi.com.br/dica/6672/salvar-imagem-completa-no-mysql http://pt.stackoverflow.com/questions/108758/como-inserir-recuperar-imagem-no-banco-de-dados-mysql https://www.google.com.br/?gws_rd=ssl#q=gravar+imagem+no+banco+de+dados+delphi OBS: veja na pasta Demos do Delphi ... tem um exemplo FishFact C:\Arquivos de programas\Borland\Delphi7\Demos\Db\FishFact abraço

tem muitas maneiras de testar uma placa de rede sugestões: 1 - na placa de rede tem 2 leds -- 1 fica piscando e o outro fica aceso direto 2 - veja em conexões de rede, se foi criada uma conexão de rede ou se existe uma conexão ativa 3 - va em iniciar > executar > digite cmd > depois digite ping 127.0.0.1 o resultado deve ser esse Disparando contra 127.0.0.1 com 32 bytes de dados: Resposta de 127.0.0.1: bytes=32 tempo<1ms TTL=64 Resposta de 127.0.0.1: bytes=32 tempo<1ms TTL=64 Resposta de 127.0.0.1: bytes=32 tempo<1ms TTL=64 Resposta de 127.0.0.1: bytes=32 tempo<1ms TTL=64 Estat¡sticas do Ping para 127.0.0.1: Pacotes: Enviados = 4, Recebidos = 4, Perdidos = 0 (0% de perda), Aproximar um numero redondo de vezes em milissegundos: Minimo = 0ms, Maximo = 0ms, Media = 0ms OBS: mesmo que os leds estejam mostrando que a placa está ok, a entrada do sinal da placa de rede pode estar queimada .... pode ser tambem que o cabo de rede esteja partido em algum pino nesse link tem varios aparelhos para testar placas e cabos de rede http://pt.aliexpress.com/promotion/industry-business_network-adapter-tester-promotion.html uma placa de rede nova esta em torno de R 35,00 e vem com os drives de instalação http://informatica.mercadolivre.com.br/placas-rede/placa-rede-pci-express abraço

exemplo em javascript <html> <body> <script type="text/javascript"> var browser=navigator.appName; var b_version=navigator.appVersion; var version=parseFloat(b_version); document.write("Browser name: "+ browser); document.write("<br />"); document.write("Browser version: "+ version); </script> </body> </html> abraço

exemplos http://thundaxsoftware.blogspot.com.br/2011/09/get-chrome-active-tab-url-using-delphi.html http://www.devmedia.com.br/forum/com-saber-em-runtime-qual-navegador-e-o-padrão/458321 http://www.planetadelphi.com.br/dica/566/retornando-path-de-browser-padrão http://www.superasp.com.br/forum_respostas.asp?dep=5,5&id=15115 veja outras maneiras: http://www.arquivodecodigos.net/arquivo/tutoriais/javascript/erros_deteccao_browser_1_10.php http://www.guj.com.br/t/funcao-em-javascript-que-detecta-o-navegador-do-usuario/166247/3 https://www.google.com.br/#q=identificar+navegador abraço

quando eu minimizo o form fica o bloquinho minimizado em cima, na parte superior da tela do computador!! isso é estranho, pois quando minimizo as minhas aplicações, as janelas ficam na parte inferior esquerda da tela ( as vezes nem aparecem ) por isso eu uso o RxTrayIcon com o PopupMenu para maximizar as janelas novamente. E quando eu passo o mouse em cima do icone ele aparece a imagem do form de login. veja se voce não colocou algum código no evento OnMouseMove do seu Form Menu ou do Login abraço

acho que voce ainda não entendeu .... quando voce cria um sistema, voce não vai deixar que o usuario mova a tela de menu do seu lugar, mas vai deixar que ele a minimize para poder fazer alguma outra coisa, sem a necessidade de fechar o programa. nesse momento é que voce minimiza a tela de login, para que ela não fique aparecendo por traz da tela de menu. deixar o form sem poder move-lo do lugar: http://www.devmedia.com.br/forum/form-não-mover/331998 abraço

vou fazer um exemplo para voce ver como funciona fiz um Form1 que seria o seu form de login unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation uses Unit2; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin form2.showmodal; end; end. ============================================================== nele tem apenas um botão para chamar o Form2 que seria o seu form de Menu unit Unit2; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Menus, ExtCtrls, ComCtrls, StdCtrls; type TForm2 = class(TForm) private { Private declarations } procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; public { Public declarations } end; var Form2: TForm2; implementation uses Unit1; {$R *.dfm} procedure TForm2.WMSysCommand(var Msg: TWMSysCommand); begin if (Msg.CmdType = SC_MINIMIZE) then Form1.WindowState := wsMinimized; DefaultHandler(Msg); end; end. ============================================================ observe os comandos e as uses declaradas quando voce minimiza o Form2 ( Menu ) o Form1 ( Login ) será minimizado automaticamente abraço

veja se voce definiu a uses Dialogs e Messages, esse comando está errado login.Form1.WindowState := wsMinimized; seria NomedoFormLogin.WindowState := wsMinimized; coloque o nome do seu form login abraço

Logo quando faço o login com usuário e senha a tela de login fica aberta.. isso está correto ... voce só vai fechar esse form, quando fechar a sua aplicação. o que voce tem que fazer é minimizar esse form, quando o form do Menu for minimizado. coloque esse comando no Private do form Menu private { Private declarations } procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; depois do Implementation coloque ========================================================== procedure TFMenu.WMSysCommand(var Msg: TWMSysCommand); begin if (Msg.CmdType = SC_MINIMIZE) then begin //// Login ( troque pelo nome do seu form Login e Senha) Login.WindowState := wsMinimized; end; DefaultHandler(Msg); end; ====================================================== OBS: procedure TFMenu é o nome do seu Form de Menu quando voce minimizar o seu programa, automaticamente o form de Login e Senha tambem será minimizado e não ficará aparecendo abraço

fiz um teste aqui... está funcionando normal a funçao esta matando somente a instancia do word criada pelo programa as outras criadas pelo proprio word continuam lá ... ou voce pode tentar assim: Ao iniciar, cada processo recebe uma identificação numérica única, atribuída pelo sistema — chama-se PID, Process IDentification. Para “matar” um programa em execução, você precisa saber o PID dele O PID é um numero que identifica cada instancia exemplo : WINWORD.EXE PID = 3104 - 2º documento criado WINWORD.EXE PID = 2284 - 1º documento criado voce pode procurar o PID do processo pelo seu programa e matar somente ele Nome da imagem Identi Nome da sessÆo SessÆo# Uso de mem¢r ========================= ====== ================ ======== ============ System Idle Process 0 Console 0 28 K System 4 Console 0 260 K smss.exe 832 Console 0 392 K csrss.exe 896 Console 0 5.624 K winlogon.exe 928 Console 0 1.356 K services.exe 972 Console 0 3.996 K lsass.exe 984 Console 0 1.516 K svchost.exe 1152 Console 0 4.972 K svchost.exe 1220 Console 0 4.132 K svchost.exe 1364 Console 0 19.440 K svchost.exe 1536 Console 0 3.592 K spoolsv.exe 1772 Console 0 5.552 K hrsrv.exe 1904 Console 0 6.012 K mysqld.exe 1936 Console 0 16.856 K s3loadsv.exe 1972 Console 0 2.840 K ss_conn_service.exe 284 Console 0 2.548 K svchost.exe 344 Console 0 3.892 K vsmon.exe 444 Console 0 13.256 K alg.exe 1048 Console 0 3.312 K explorer.exe 1348 Console 0 31.024 K Monitor.exe 1356 Console 0 12.348 K zlclient.exe 1696 Console 0 4.720 K firefox.exe 4088 Console 0 243.808 K delphi32.exe 2520 Console 0 12.168 K notepad.exe 1172 Console 0 600 K Project2.exe 3320 Console 0 6.016 K cmd.exe 3088 Console 0 2.432 K notepad.exe 3296 Console 0 3.548 K WINWORD.EXE 2560 Console 0 23.396 K WINWORD.EXE 1648 Console 0 23.204 K tasklist.exe 4004 Console 0 4.304 K wmiprvse.exe 3308 Console 0 5.464 K ------------------------------------------------------------------------------------------------- para matar o processo seria apenas esse comando tskill 2560 que voce pode executar pelo shellexecute ou o comando winexec do delphi veja ... essa é a uma das maneiras de fazer o que esta querendo http://www.guiadopc.com.br/dicas/33353/matar-processos-linha-comando-windows.html abraço

na propriedade Icon voce coloca o icone que voce quer que apareça na barra de tarefas na propriedade Hint voce coloca o nome do seu programa e na propriedade active voce deixa como true ao executar o programa o icone vai aparecer na barra de tarefas, mesmo ele não estando minimizado use tambem o componente PopupMenu1 da aba Standard junto com o RXTrayIcon para que voce possa maximizar o seu programa novamente abraço

pode usar sem problemas .... ------------------------------------------------------------------------------------------------------------- function TForm1.KillTask(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; ------------------------------------------------------------------------------------------------------------------- a função KillTask só vai tirar da memória a instancia do word criado pelo programa se houver outras instancias criadas pelo proprio word, elas não serão tiradas abraço

mostre a função KILLTASK que voce está usando