AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Globale Proceduren

Ein Thema von Thorben86 · begonnen am 4. Dez 2003 · letzter Beitrag vom 4. Dez 2003
Antwort Antwort
Thorben86

Registriert seit: 20. Nov 2003
Ort: Brühl
365 Beiträge
 
Delphi 2005 Personal
 
#1

Globale Proceduren

  Alt 4. Dez 2003, 18:37
Hi, ich will ne eigene Procedure schreiben
z.B.
Delphi-Quellcode:
procedure Test;
begin
....
end;
mein problem ist, dat ich die Global brauch, und da muss ich die ja deklariueren, nur weiss ich nit was ich da alles hinschreiben soll.
  Mit Zitat antworten Zitat
Alexander

Registriert seit: 28. Aug 2002
Ort: Oldenburg
3.513 Beiträge
 
Turbo Delphi für .NET
 
#2

Re: Globale Proceduren

  Alt 4. Dez 2003, 18:50
Du musst sie, wenn sie in deinem gesamten Projekt verfügbar sein soll, mit ins Public aufnehmen:
Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
  private
    { Private-Deklarationen }
  public
    procedure test({Parameter....});
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.test({Parameter....});
begin
// Das ist eine globale Procedure....
end;

end.
Alexander
  Mit Zitat antworten Zitat
Tiefflieger

Registriert seit: 20. Mai 2003
18 Beiträge
 
Delphi 6 Personal
 
#3

Re: Globale Proceduren

  Alt 4. Dez 2003, 20:56
Zitat von Alexander:
Du musst sie, wenn sie in deinem gesamten Projekt verfügbar sein soll...
wenn nicht, sprich wenn die prozedur nur von bestimmten units benutzt werden soll: den prozedurkopf in den Interface-Teil schreiben und die implementation dann in den Implementations-teil:

Delphi-Quellcode:
unit MeineUnit;

interface

function MeineFunktion(x,y:integer):integer;

implementation

function MeineFunktion(x,y:integer):integer;
begin
  result := x+y;
end;

end.
danach kann man die prozedur(bzw die Unit, in der die Prozedur enthalten ist) dann in allen Units, wo man sie braucht, per

uses MeineUnit; einbinden und benutzen.
Irren ist menschlich.
Aber wenn man richtig Mist bauen will, braucht man einen Computer.

Dan Rather, CBS-Fernsehreporter
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:18 Uhr.
Powered by vBulletin® Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2020 by Daniel R. Wolf