AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

ListBox1 unbekannt in eigener prozedur

Ein Thema von Simatix · begonnen am 3. Jun 2010 · letzter Beitrag vom 10. Jun 2010
 
Simatix

Registriert seit: 3. Jun 2010
Ort: Freiburg
1 Beiträge
 
#1

ListBox1 unbekannt in eigener prozedur

  Alt 3. Jun 2010, 21:45
Hallo Zusammen,

ich habe ein Problem, bzw. evtl mehrere..... Ich habe eine eigene Prozedur in der ich eine ListBox1 beschreiben will.
Dort ist diese aber nicht bekannt ? Warum ist mir nicht klar. Der Momentane Quellcode sieht so aus:

Delphi-Quellcode:
unit RS232Main;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, Menus, ImgList, InfoForm;

type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    EdtSend1: TEdit;
    BtnSend1: TButton;
    EdtSend2: TEdit;
    BtnSend2: TButton;
    EdtSend3: TEdit;
    BtnSend3: TButton;
    EdtSend4: TEdit;
    BtnSend4: TButton;
    EdtSend5: TEdit;
    BtnSend5: TButton;
    EdtSend6: TEdit;
    BtnSend6: TButton;
    GroupBox1: TGroupBox;
    Image1: TImage;
    StaticText1: TStaticText;
    MainMenu1: TMainMenu;
    Datei1: TMenuItem;
    Extras1: TMenuItem;
    N1: TMenuItem;
    Parameterdateisichern1: TMenuItem;
    Parameterdateiladen1: TMenuItem;
    Schnittstelle1: TMenuItem;
    Info1: TMenuItem;
    Speichern1: TMenuItem;
    N2: TMenuItem;
    Beenden1: TMenuItem;
    ImageListMenu: TImageList;
    GroupBox2: TGroupBox;
    LabelStatusEdit: TLabel;
    ClearKonsole1: TMenuItem;
    RS2321: TMenuItem;
    Ethernet1: TMenuItem;
    N3: TMenuItem;
    Parameter1: TMenuItem;
    OpenDialog1: TOpenDialog;
    SaveDialog1: TSaveDialog;
    procedure Beenden1Click(Sender: TObject);
    procedure Info1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure ClearKonsole1Click(Sender: TObject);
    procedure Parameterdateiladen1Click(Sender: TObject);
    procedure Speichern1Click(Sender: TObject);
    procedure Parameterdateisichern1Click(Sender: TObject);
    procedure BtnSend1Click(Sender: TObject);
    procedure BtnSend2Click(Sender: TObject);
    procedure BtnSend3Click(Sender: TObject);
    procedure BtnSend4Click(Sender: TObject);
    procedure BtnSend5Click(Sender: TObject);
    procedure BtnSend6Click(Sender: TObject);
    procedure RS2321Click(Sender: TObject);
    procedure Ethernet1Click(Sender: TObject);
private
    { Private-Deklarationen }

  public
    { Public-Deklarationen }

  end;

  //Deklarationen
  procedure BtnSend(BefehlNr: Integer; Befehl:String);
  procedure RS232Send(BefehlNr: Integer; Befehl:String);


     .....


//*************************
// RS232: Senden BefehlNr()
//*************************
procedure RS232Send(BefehlNr: Integer; Befehl:String);
begin
  ListBox1.xxxxxx //Hier ist die ListBox unbekannt
  Exit;

End; //RS232Send
Schiebe ich die Deklarationen der eigenen Prozeduren hoch in Private oder Public geht garnichts mehr ... warum ka !
Hilfe Hilfe ich weiss nicht weiter ... und Ja es fehlen auch die Grundlagen

LG Philip
[x] hier anbohren für neuen Monitor
  Mit Zitat antworten Zitat
 


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 10:44 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz