Livio Neiva Postado Agosto 14, 2007 Denunciar Share Postado Agosto 14, 2007 Onde faço uma variável Global???E como faço esse tipo devariável?Declarar variable Lin com o tipo Real e escopo global Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest --Jonas -- Postado Agosto 14, 2007 Denunciar Share Postado Agosto 14, 2007 Onde faço uma variável Global???E como faço esse tipo devariável?Declarar variable Lin com o tipo Real e escopo globalVariáveis GlobaisAs variáveis abaixo são globais, declaradas da Interface da Unit. Podem ser acessadas por qualquer Unit usuária declarada na clausula Uses EX:unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; var Form1: TForm1; I: Integer; // definção de variaveis globais Usuario: string; A, B, Soma: Double; Ok: Boolean; Lin : real; implementation {$R *.DFM} uses UCadastro, UCalculo, UQReport; // units usuárias end. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Livio Neiva Postado Agosto 14, 2007 Autor Denunciar Share Postado Agosto 14, 2007 Onde faço uma variável Global???E como faço esse tipo devariável?Declarar variable Lin com o tipo Real e escopo globalVariáveis GlobaisAs variáveis abaixo são globais, declaradas da Interface da Unit. Podem ser acessadas por qualquer Unit usuária declarada na clausula Uses EX:unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; var Form1: TForm1; I: Integer; // definção de variaveis globais Usuario: string; A, B, Soma: Double; Ok: Boolean; Lin : real; implementation {$R *.DFM} uses UCadastro, UCalculo, UQReport; // units usuárias end.Ótimo, obrigado!!!Agora o que é um escopo global???e como faço um??? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Guest --Jonas -- Postado Agosto 14, 2007 Denunciar Share Postado Agosto 14, 2007 Não sei se entendi direito se ao que voce se refere como escobo global ( em qualquer lugar do projeto ? ) ... se for usar a variavel em qualquer lugar do projeto basta declarar a variavel no public do form principal, ou definir como global e chamar esta variavel no form que voce quiser pela clausula uses desse form ... exemplo : voce delcarou a clausula Lin : real no form principal que vamos cahamar de Form1 e quer usar essa variavel no seu Form5, basta declarar na uses do Form5 o seguinte: Uses Form1 e em alguma procedure trabalhar com esta variavel ..Exemplo:unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm5 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form5: TForm5; implementation {$R *.DFM} uses Form1; // a variavel esta definida no Form1 procedure TForm5.Button1Click(Sender: TObject); begin Form1.Lin := 90.00; // aqui voce esta usando a variavel definida no Form1, usando o Form5 end; end. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Livio Neiva Postado Agosto 14, 2007 Autor Denunciar Share Postado Agosto 14, 2007 Não sei se entendi direito se ao que voce se refere como escobo global ( em qualquer lugar do projeto ? ) ... se for usar a variavel em qualquer lugar do projeto basta declarar a variavel no public do form principal, ou definir como global e chamar esta variavel no form que voce quiser pela clausula uses desse form ... exemplo : voce delcarou a clausula Lin : real no form principal que vamos cahamar de Form1 e quer usar essa variavel no seu Form5, basta declarar na uses do Form5 o seguinte: Uses Form1 e em alguma procedure trabalhar com esta variavel ..Exemplo:unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm5 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form5: TForm5; implementation {$R *.DFM} uses Form1; // a variavel esta definida no Form1 procedure TForm5.Button1Click(Sender: TObject); begin Form1.Lin := 90.00; // aqui voce esta usando a variavel definida no Form1, usando o Form5 end; end.Ótimo!!!Entendi agora!!!Questão Resolvida,muito Obrigado. Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Livio Neiva
Onde faço uma variável Global???
E como faço esse tipo devariável?
Declarar variable Lin com o tipo Real e escopo global
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.