unit Unit2;
interface
uses Messages, Dialogs, SysUtils;
procedure Teste(pTexto : String); overload;
procedure Teste(pTexto : String; pNumero : Integer); overload;
implementation
procedure Teste(pTexto : String);
begin
ShowMessage(pTexto);
end;
procedure Teste(pTexto : String; pNumero : Integer);
begin
ShowMessage(pTexto + #13 + IntToStr(pNumero);
end;
end.
Eduardo Castro Alves
Analista de Sistemas
-----Original Message-----
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of Hauseman
Sent: sábado, 3 de junho de 2006 15:14
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Procedure global
Boa tarde a todos. Estou tentando criar um procedimento que eu possa usar
em qualquer ponto do projeto. Criei uma unit para ele. Referenciei a unit no
uses das outras units do projeto, só que não consigo chamar o procedimento.
Alguém sabe como devo chamar procedimento. Ou um outra forma de cria- lo
para usar em qualquer parte do projeto?
[]'s
Hauseman
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por: | |
|
Links do Yahoo! Grupos
- Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
- Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.