Ir para conteúdo
Fórum Script Brasil

fernando_vip

Membros
  • Total de itens

    141
  • Registro em

  • Última visita

Tudo que fernando_vip postou

  1. mANO ESTOU SEGUINDO AQUELA TUTOR SOBRE RELATÓRIOS SUA, PORÉM você TRATA DE UM TERMO "QUOTE", PORÉM NÃO o que você QUIZ DIZER COM ISSO, PODE SER MAIS ESPECÍFICO?
  2. fernando_vip

    Código

    Mano Todos os códigos descritos aí são os mesmos que estão no meu programa...a única alteração que fiz, neste cód, foi as Aspas Manda o seu código que vou comparar, pode ser?
  3. fernando_vip

    Código

    valeu mano pela força, apesar do programa ter compilado, gerado o executável, porém qd clico nele ele não roda, sabe o que pode ser?
  4. Olá Cara eu estou usando o Delphi 7 e não consegui encontrar a palheta guia com os botoes dii quickReport, tem alguma coisa na configuração a fazer??? valeu
  5. Brazlandiaonline Olá Pessoal!!! Estou querendo montar, ou melhor, montei um programinha com conexão com o access e quero imprimir relatórios numa arte do corel que já está no programa, porém não sei como usar o Qreport e não sei como usar, alguém pode ajjuddaaarrr??? Falow galera
  6. Brazlandiaonline Olá!! Meu nome é Márcio Fernando e estou fazendo uns exercícios duma apostila, (Curso Delphi 3.02- Apostila 01) e estou com um problema. Segui todos os passos que foram deseignados pela tutor, porém não compila dando erro em duas linhas de código, vou mandar o cód inteiro e as linhas com erro vão logo em seguida. Se vc's puderem ajudar.. Grato O Código: unit UntCartao; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; type TF_Cartao = class(TForm) Image1: TImage; Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; Label8: TLabel; Memo1: TMemo; Timer1: TTimer; procedure FormShow(Sender: TObject); procedure Timer1Timer(Sender: TObject); private NumLinha:Integer; public { Public declarations } end; var F_Cartao: TF_Cartao; implementation {$R *.dfm} procedure TF_Cartao.FormShow(Sender: TObject); var i:Integer; begin For i:=ComponentCount - 1 downto 0 do if(componentsis TLabel)then (Components as TLAbel).Caption :="; NumLinha :=0; Timer1Timer(Sender); end; procedure TF_Cartao.Timer1Timer(Sender: TObject); function Monta : String; begin result:= Memo1.Lines[NumLinha]; inc(NumLinha); if NumLinha > 30 then NumLinha :=0; end; var i: Integer; begin NumLinha := NumLinha - 7; Label1.Caption := Monta; Label2.Caption := Monta; Label3.Caption := Monta; Label4.Caption := Monta; Label5.Caption := Monta; Label6.Caption := Monta; Label7.Caption := Monta; Label8.Caption := Monta; end; Os erros: 1- [Error] UntCartao.pas(44): Illegal character in input file: '"' ($22) (Components as TLAbel).Caption :="; 2- [Error] UntCartao.pas(74): Declaration expected but end of file found 3-[Fatal Error] Cartao.DPR(8): Could not compile used unit 'UntCartao.pas' UntCartao in 'UntCartao.pas' {F_Cartao}; É que esta é a primeira tutor minha neste programa e estou usando o Delphi 7
  7. fernando_vip

    J2sdk1.4.2_08

    Olá pessoal!!! Baixei uma SDK(j2sdk1.4.2_08) e tmb uma tutor de como configurá-la, porém quando faço tudo o que pede na tutor e vou no prompt e digito "javac" dá o seguinte erro: 'javac' não é reconhecido comno comando interno ou externo, um programa operável ou um arquivo em lotes. Alguém pode ajudar??/ falow e obrigado
  8. fernando_vip

    Links

    O Portal de Brazlândia
  9. Olá Pessoal, Voltei!!!!! ..............hehe...................... Alguém pode me dizer como corrigir os erros existentes nesse código? unit Projeto1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TFrmCalc = class(TForm) Label1: TLabel; Btn1: TButton; Btn2: TButton; Btn3: TButton; Btn4: TButton; Btn5: TButton; Btn6: TButton; Btn7: TButton; Btn8: TButton; btn9: TButton; btn10: TButton; btn11: TButton; btn12: TButton; Btn13: TButton; Btn14: TButton; Btn15: TButton; Btn16: TButton; Edit1: TEdit; procedure Btn1Click(Sender: TObject); procedure Btn14Click(Sender: TObject); procedure Btn2Click(Sender: TObject); procedure Btn3Click(Sender: TObject); procedure Btn4Click(Sender: TObject); procedure Btn5Click(Sender: TObject); procedure Btn6Click(Sender: TObject); procedure Btn7Click(Sender: TObject); procedure Btn8Click(Sender: TObject); procedure btn9Click(Sender: TObject); procedure btn10Click(Sender: TObject); procedure Btn13Click(Sender: TObject); procedure btn12Click(Sender: TObject); procedure btn11Click(Sender: TObject); procedure Btn15Click(Sender: TObject); procedure Btn16Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var FrmCalc: TFrmCalc; ope : STRING; valor,valor2:Integer implementation {$R *.dfm} procedure TFrmCalc.Btn1Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'1'; if edtval. Text='0'then edtval.Text:='1'; end; procedure TFrmCalc.Btn14Click(Sender: TObject); begin ope:='+'; valor:=strtoint(edtval.Text); edtval.Text:=''; Btn14.Enabled:=false; Btn13.Enabled:=false; btn11.Enabled:=false; btn12.Enabled:=false; end; procedure TFrmCalc.Btn2Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'2'; if edtval. Text:='0'then edtval.Text:='2'; end; procedure TFrmCalc.Btn3Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'3'; if edtval. Text:='0'then edtval.Text:='3' end; procedure TFrmCalc.Btn4Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'4'; if edtval. Text:='0'then edtval.Text:='4' end; procedure TFrmCalc.Btn5Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'5'; if edtval. Text:='0'then edtval.Text:='5' end; procedure TFrmCalc.Btn6Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'6'; if edtval. Text:='0'then edtval.Text:='6' end; procedure TFrmCalc.Btn7Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'7'; if edtval. Text:='0'then edtval.Text:='7' end; procedure TFrmCalc.Btn8Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'8'; if edtval. Text:='0'then edtval.Text:='8' end; procedure TFrmCalc.btn9Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'9'; if edtval. Text:='0'then edtval.Text:='' end; procedure TFrmCalc.btn10Click(Sender: TObject); begin if edtval.Text<>'0'then edtval.Text:=edtval.Text+'0'; if edtval. Text:='0'then edtval.Text:='0' end; procedure TFrmCalc.Btn13Click(Sender: TObject); begin ope:='-'; valor:=strtoint(edtval.Text); edtval.Text:=''; Btn14.Enabled:=false; Btn13.Enabled:=false; btn11.Enabled:=false; btn12.Enabled:=false; end; procedure TFrmCalc.btn12Click(Sender: TObject); begin ope:='*'; valor:=strtoint(edtval.Text); edtval.Text:=''; Btn14.Enabled:=false; Btn13.Enabled:=false; btn11.Enabled:=false; btn12.Enabled:=false; end; procedure TFrmCalc.btn11Click(Sender: TObject); begin ope:='/'; valor:=strtoint(edtval.Text); edtval.Text:=''; Btn14.Enabled:=false; Btn13.Enabled:=false; btn11.Enabled:=false; btn12.Enabled:=false; end; procedure TFrmCalc.Btn15Click(Sender: TObject); begin Btn15.Enabled:=true; Btn13.Enabled:= true; btn11.Enabled:= true; btn12.Enabled:= true; edival.Text:='0'; valor:= strtoint ('0'); valor2:= strtoint ('0'); end; procedure TFrmCalc.Btn16Click(Sender: TObject); begin valor2:= strtoint (edtval.Text); if ope='+' then edtval.Text:= inttostr(valor=valor2); if ope='-' then edtval.inttostr(valor+valor2); if ipe = '*' then edtval.inttosr (valor+valor2); if ipe = '/' then edtval.inttosr (valor+valor2); end; end. se precisarem de mais alguma informação : fernando_millenniuinfo@yahoo.com ou nandinho@mfs.eng.br MSN O Portal de Brazlândia-df
  10. fernando_vip

    Hellworldconsole

    Já fiz isso mas não funciona
  11. Olha quem Voltou???? .............rsrsrsrsrsrs........ Vamos ao que interessa. Estou estudando Java e sou leigo, então decidi ir pelo bloco de notas mesmo, segundo o conselho de um amigo aqui do forum, então, todo empolgado mandei ver no código: public class HelloWorldConsole { puclic static void main(String args []) { System.out.println("Hello, World!"); } } ...a tutor fala para digitar o "javac.HelloWorldConsole.java", fiz isso no prompt do MS-DOS e nada funciona. Ond estou pecando? Valeu
  12. fernando_vip

    Jsp

    Outra dica é pegar o NetBeans 4.1 e instalar, nele você faz suas aplicações web sem precisar saber configurações , deployd e etc....mas é claro posteriormente você tem que estudar isso, para implementar um sistema bem feito!!! Onde posso pegar o netBeans 4.1??? Para download é claro rsrsrs fui
  13. fernando_vip

    Jbuilder

    QUOTE (fernando_vip @ Feb 25 2005, 05:53 PM) Isso velho, de graça será que agora você pode me ajudar? mil desculpas, eu tambem estou começando agora... vamos ver se dois é melhor do que um... o gente vamos ai ajuda agente ae........ Foi mal veio Penssei que você fosse veterano e estivesse curtindo com a minha cara
  14. Pô mano.... >>Esta tuto é massa, virou livro de consulta Muito boa mesmo parabens
  15. fernando_vip

    Oracle

    Será qu alguém aqui sabe como baixar o Oracle no site www.oracle.com??? é que meu inglês está enferrujado
  16. fernando_vip

    Jbuilder

    Isso velho, de graça será que agora você pode me ajudar?
  17. E aê manos:0 Estou com uma pequena dúvida, no curso do IPED está pedindo para criar um movieclip, porém não ensina como devo fazer isso, será que alg pode ajudar? Valeu!!!!!:( :|
  18. fernando_vip

    Servidor Jsp

    Estou aprendendo JSP numas tuto que baixei e queria saber como posso fazer para instalar um servidor JSP...
  19. fernando_vip

    Jbuilder

    No site da Borland
  20. olha bicho ........................................... Se eu não emengano tem esta matéria já publi na área dos códigos:}
  21. fernando_vip

    Jsp

    Olá... Como Devo fazer para instalar o JSP? Estou com umas tutor's mas não sei como começar, alguém pode me ajudar?
  22. fernando_vip

    Nao Confunda!

    Como posso consegu-i-lo? Que site gratuito?
  23. fernando_vip

    Jbuilder

    Olá Galera eu baixei o Jbuilder, porém não sei como usá-lo, pois tudo o que encontrei sobre ele está em inglês, será que alguém sabe de alguma tuto em portuga sobre ele? Valeu
  24. Bicho Tem um tópico quente aqui no furum, área dos modera que tem um link para apostila de Java 2 em 3ª edição, vai lá tú vai ficar satifeito, o livro ainda não foi totalmente traduzido mas é legal pacas....
  25. fernando_vip

    Jsp

    Olá!!!!!!! Estou qr programar em JSP, porém não sei nem como começar, alguém pode dar uma luz ai? Já manjo um pouco de J2SE, porém o que quero mesmo é me especializar em JSP nandinho@mfs.eng.br
×
×
  • Criar Novo...