Darlan

você pode fazer assim var arquivo :textfile; Assignfile(arquivo,'c:\windows\sap.txt'); //a varialvel arquivo, recebe o nome do arquivo rewrite(arquivo); linha := num + nome; writeln(arquivo, linha); //insere dados no arquivo closefile(arquivo); //fecha o arquivo Espero ter ajudado

Bom dia Alguém sabe como faço para setar 132 colunas para um relatório no delphi, se tem como fazer isso? Obrigado

Fala ai cara, pelo que eu conheço, o delphi é muito parecido com o C++ builder, a lógica de programar é a mesma.. darlan....

faz assim cara: var data: tdate; //cria uma variável do tipo tdate begin data:= date();// a variável recebe a função date() que pega a data do micro Edit1.Text:=datetostr(data); //converte ela para string end; falow

Na minha opinião cara você deve meter a cara e colocar seus programas sem medo, pois se na sua empresa esta funcionando, porque que nas outras não vai funcionar não é?... como diz o ditado... o cavalho ençilhado só passa uma vez.... então não perca a oportunidade.. Falow..... Darlan

e para criar um triangulo, no mesmo evento procedure Tfrmtela.FormCreate(Sender: TObject); var pontos: array [1..4] of TPoint; begin pontos[1].x := 220; pontos[1].y := 30; pontos[2].x := 30; pontos[2].y := 220; pontos[3].x := 410; pontos[3].y := 220; hd := CreatePolygonRgn(pontos,3,1); SetWindowRgn(Handle,Hd,True); scaled := true; end; Darlan.... para mudar o tamanho alterar os valores do array.... se quiser criar um octeto por exemplo, aumenta o array para 8, e passa 8 para a função, e cria os outros 5 pontos... simples e objetivo.... Falow

para cliar na forma de elipse: no evento formcreate do formulário.... procedure Tfrmtela.FormCreate(Sender: TObject); var Hd : THandle; begin Hd := CreateEllipticRgn(35,40,600,600); SetWindowRgn(Handle,Hd,True); scaled := true; end; assim ele irá criar o formulário na forma de uma elipse, se quiser mudar a foma dela é só alterar os valores desta linha Hd := CreateEllipticRgn(35,40,600,600); Darlan

Neste modelo que você quer como figuras eu nunca vi, e não sei se tem como fazr, oque pode ser feito é você abrir um form na forma de um triangulo, ou de uma elipse, isso tem como fazer, e é relativamente fácil... Darlan

Poir que já cara. setei foco no formulário no edit....e não vai pra frente.. só que rodando do delphi funciona certo, agora rodando direto do executável que da este problema.... Darlan

Boa tarde pessoal.. Bem estou com um probleminha, tenho uma aplicação que tem um ícone na barra de tarefas, eu programei o evento de duplo clique do rxtryicon, ele abre o programa tudo certo, só que se eu tento digitar alguma coisa, o programa não aceita nada, sendo que o foco esta sobre o edit da tela, se eu clicar sobre este edit, dai eu consigo digitar normalmente.... alguém sabe o porquê disso? Darlan

tem meu apoio pessoal....... Darlan

para o delphi 7 o projeto não é mais o rxdemo certo? não sei se alguém já tentou compilar o projeto para o delphi 7, eu tentei compilar e me apresentou alguns erros? alguém já compilou este projeto? Darlan

Para a imagem não apareçer duplicada como ela apareçe lá, ou seja com aquela imagem tipo quando esta desabilitado, você seleciona a opção "crop" na hora de inserir a imagem no botão, assim ela vai apareçer apenas a imagem simples. Falow.....

Bom dia galera..... também queria fazer um gradiente na vertical no popupmenu, mas não estou achando a função que faz isso, alguém encontrou ela? Darlan

Valeu piradox...deu certo.... Brigadão..... t+

Bom dia pessoal..... Bem eu tenho um programa que quando ativado cria um icone na barra de tarefas.. Hoje para ter acesso ao programa, eu clico com o botão direito do mouse e em acessar sistema. omo eu faço para acessar o sistema, com um duplo clique sobre este ícone? eu uso o RxTryicon... Value....

Ok achei e já instalei ela, eu já usei este componete rxlib numa aplicação, que tenho o icone na barra de memória, mas não lembrava do Rxgifanimator, muito bom ele.... Valeu pela dica.... Darlan

beleza Mauro Junior..... se precisar algo posta aê T+ Darlan

Valeu piradox...vou procurar este componente..... T+

Mauro Junior Descobri como pergar as teclas minusculas e maiusculas... no evento onkeypress do edit que você colocou no form coloque a linha: label1.Caption := InttoStr(ord(Key)); se o "caps" estiver ligado ele pega o valor das maiusculas senão das minusculas.... agora não entendi o porque ele não faz isso no onkeydown... falow...

Alguém já trabalhou com gif animado no delphi? Darlan

Mauro Junior alt =18 del =46 ctrl=17 f4=115 espero ter ajudado.... você pode fazer um programinha bem simples pra descobir isso, coloque um label num form, e um edit, no evento onkeydowm do edit coloque label1.caption := inttostr(key); ele vai pegar o valor da tecla prescionada e te mostrar no label.... Valeu amigo..... Darlan

Aê gente boa.... Bem pessoal, tenho a seguinte situação.... tenho um cliente com 8 filiais, usando ip fixo, tenho que desenvolver uma aplicação que todas as filiais acessem o banco e gravem informações no mesmo, apenas gravar, nada de consulta, alteração nada, pois na matriz serão feitos estes processos. o software eu já tenho pronto hoje, mas roda apensa em máquina local, eu preciso adaptálo para esta empresa. Como eu posso fazer a comunicação com o servidor, via ODBC, ou outra forma? Aguardo a ajuda dos amigos..... Obs: eu teria por necessidade gravar as informações em arquivo texto, será que é possível?

Bom dia pessoal! Gostaria de saber se tenho como chamar uma tela de alerta java script dentro do php.. obrigado