Kikonanet

Carla, Use o componente WebBrowser no Delphi 7 fica na palheta Internet Comandos: WebBrowser1.GoBack;// Volta; WebBrowser1.Navigate('www.pagina.com.br');// abre a página WebBrowser1.GoForward;//próxima WebBrowser1.Stop; // parar WebBrowser1.Refresh; // atualiza Abs. Kikonanet

Bom Alessandro, Você precisa instalar nas CPU's que irão usar seu programa o Interbase Client, e no servidor onde ficará o GDB, o Interbase Server. O MySQL é free sim, para você baixar você pode ir no google e procurar por MySQL... Abs. Kikonanet

Turbo, Ai o meu código, e dá o seguinte erro: 'O Campo é muito pequeno para aceitar a qtdade de dados q você tentou adicionar'. ? With ADOQryCad do begin Close; SQL.Clear; SQL.Add('INSERT INTO TblListaCompleta(Identificacao,NomeCompleto)'); SQL.Add('VALUES(:pIdentificacao,:pNomeCompleto)'); Parameters.ParamByName('Identificacao').Value:=ComboBoxIdentificacao.Text; Parameters.ParamByName('NomeCompleto').Value:=EditNome.Text; ExecSql; end;

Como usar esse comando em uma ADOQuery? Quey.SQL.Add('INSERT INTO Tabela(Nome) VALUES(:pNome)'); query.parambyname('pnome').AsString := Editnome.text; Não consegui fazer usando uma ADOQuery... é possível? []'s Kikonanet

Ae cara, Veja se estes links te ajuda em algo. Link 1 Link 2 Link 3 Link 4 []'s Kikonanet

Bom Halan, você pode chamar o seu Form de Login e usar o comando Form.Hide para esconder o form principal da sua aplicacao. []'s Kikonanet

Ola, Adicione uma Query With Query do begin close; SQL.Clear; SQL.Add('Select nome from pessoal where codigo ='+QuotedStr(dbCod.text)); open; end; qualquer coisa posta ai. []'s Kikonanet

Tenta assim: Edit1.Text:= AdoQuery.FieldByName('Nome_do_Campo').AsString; qualquer coisa posta ai. []'s Kikonanet

No delphi você tem q especificar o tipo da variavel: Var Var1, Var2, Var3 : integer // integer para numeros inteiros , real para numeros reais. begin var2 = 10; var3 = 15; var1 = var2 + var3; Edit1.text:=IntToStr(Var1); end; Funcoes de transformacao: StrtoFloat: string para real StrToInt: string para inteiro agora ao contrario FloatToStr e IntToStr. qualquer duvida posta.. Abs. Kikonanet

Ae galera, Tem como eu ter um campo de auto incremento começando do numero q eu escolher? Ex. Começar do 50 em diante.... []'s Kikonanet

Ola, De uma olhada neste link: clique aqui Espero q te ajude....

olá Nightmare, você pode alterar o formato de data nas opções regionais no Painel de Controle do Windows... ou usar a função: FormatDateTime('dd/mm/yyyy',StrToDate(DateToStr(now))); []'s. Kikonanet

Se você quer somente pelo ano de nascimento(ex. 08/10/1982 idade=23), é só fazer a diferença entre os anos... de uma olhada aqui qualquer coisa posta ae....

iSoron, O Servelet é do Site da minha firma, foi desenvolvido por alguns caras, eu tenho o codigo documentado, eu precisava alterar só um comando SQL.... Valeu. Kikonanet

Ae pessoal, Eu tenho um arquivo Servlet pronto, eu queria saber se tem como alterar o codigo fonte dele? eu preciso alterar algumas coisas no arquivo.....eu não manjo nada de Java.... Valeu!!

Seabra, Você pode usar um DBGrid (Palheta Data Controls) com ele você tem a opção de editar e fazer alterações!! E você usaria a query para mostrar os dados no DBGrid... qualquer coisa posta ae.... Kikonanet.

Ai esta dizendo que o índice esta fora dos limites!!! tenta esse aqui.... ListBox1.DeleteSelected;

Soma Real var Soma: real; begin Soma:=StrToFloat(Edit1.text)+StrToFloat(Edit2.text); Edit3.text:=FloatToStr(Soma); end; Soma Inteira var Soma: Integer; begin Soma:=StrToInt(Edit1.text)+StrToInt(Edit2.text); Edit3.text:=IntToStr(Soma); end;

Eu criei um array com os tipos de Impressora HP. No combobox1 você coloca as Impressoras...Ex: HP, EPSON.... Este é o exemplo de como ler para HP const Max_Tipo=3;// Constante do tamanho do número de impressoras da HP var Impressora_HP: array[1..Max_Tipo] of string =('HP Deskjet 820',HP Deskjet 680',Hp LaserJet'); // Array dos modelos das impressoras HP procedure TForm1.ComboBox1Click(Sender: TObject);// Evento Click do ComboBox1 var i: integer; begin if ComboBox1.Text='HP' then for i:=1 to Max_Tipo do ComboBox2.Items.Add(Impressora_HP); end; Se você não entender eu te envio um exemplo.... kikonanet

Acho q é isso q você quer... Adicione num Form 2 ComboBox....No ComboBox1 você coloca o nome das Impressoras.... const Max_Tipo=3; var Tipos_Impressora_A: array[1..Max_Tipo] of string =('A1','A2','A3'); procedure TForm1.ComboBox1Click(Sender: TObject); var i: integer; begin if ComboBox1.Text='NomeImpressora' then for i:=1 to Max_Tipo do ComboBox2.Items.Add(Tipos_Impressora_A); end; Ajudou?

você coloca o mesmo DataSource para os 2 DBGrids

você tem salvo num banco de dados as informações? você terá q no evento Onclik do Comobobox q tem a marca da impressora buscar os modelos....

isso mesmo comi bola

Troque o ExecSql por Open e não precisa do active=true.... Tente assim: with (ADOQuery1) do begin Close; SQL.Clear; SQL.Add('INSERT INTO Tabela(campos)'); SQL.Add('VALUES (Valores)'); Open; end;

Valeu Progr'amador..... Abs.... Kikonanet