AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Lazarus: "Kommunikation" zweier Formulare
Thema durchsuchen
Ansicht
Themen-Optionen

Lazarus: "Kommunikation" zweier Formulare

Ein Thema von Störtebeker · begonnen am 12. Okt 2008 · letzter Beitrag vom 14. Okt 2008
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von STS301
STS301

Registriert seit: 6. Nov 2007
668 Beiträge
 
Delphi 7 Personal
 
#11

Re: Lazarus: "Kommunikation" zweier Formulare

  Alt 13. Okt 2008, 08:33
bitte stell das ganze Projekt einmal hinein, weil bei dem Code suchst du lange um etwas ohne Debugger zu finden.

Neues für 0.9.26: http://wiki.lazarus.freepascal.org/L...6_release_plan
Sebastian

ölpölp

Linux will rule the universe!!
  Mit Zitat antworten Zitat
MorphieX

Registriert seit: 6. Jan 2007
10 Beiträge
 
Delphi 2007 Professional
 
#12

Re: Lazarus: "Kommunikation" zweier Formulare

  Alt 13. Okt 2008, 09:13
Funzt denn das?
Delphi-Quellcode:
unit meta;

{$mode objfpc}{$H+} 

interface

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, ExtCtrls,
  ComCtrls, StdCtrls;

type

  { TForm3 } 

  TForm3 = class(TForm)
    Bevel1: TBevel;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Edit1: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    PageControl1: TPageControl;
    Panel1: TPanel;
    TabSheet1: TTabSheet;
    TabSheet2: TTabSheet;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { private declarations } 
  public
    { public declarations } 
  end;

var
  Form3: TForm3;

implementation

uses
  main;

{ TForm3 } 

procedure TForm3.Button1Click(Sender: TObject);
begin
  Form3.close;
end;

procedure TForm3.Button2Click(Sender: TObject);
begin
  Form1.SynEdit1.seltext:='META name="Generator" content="'+Form3.Edit1.Text+'">'+#13#10+'';
end;

initialization
  {$I meta.lrs} 

end.
  Mit Zitat antworten Zitat
Benutzerbild von STS301
STS301

Registriert seit: 6. Nov 2007
668 Beiträge
 
Delphi 7 Personal
 
#13

Re: Lazarus: "Kommunikation" zweier Formulare

  Alt 13. Okt 2008, 12:01
@MorphieX: na klar
wenn da nicht funktionieren sollte, musst du main in die obrige Uses Klausel einfügen
Sebastian

ölpölp

Linux will rule the universe!!
  Mit Zitat antworten Zitat
Benutzerbild von Störtebeker
Störtebeker

Registriert seit: 9. Jul 2007
398 Beiträge
 
#14

Re: Lazarus: "Kommunikation" zweier Formulare

  Alt 13. Okt 2008, 20:10
Danke, an euch alle. Mit dem Hinweis bzw. der Lösung von MorphieX funktioniert es jetzt.
"And he piled upon the whale´s white hump - a sum of all the rage and hate felt by his whole race.
If his chest had been a cannon, he would have shot his heart upon it."
  Mit Zitat antworten Zitat
omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#15

Re: Lazarus: "Kommunikation" zweier Formulare

  Alt 14. Okt 2008, 21:27
Die Art, wie ihr hier eure Programme gestaltet ist aber nicht wirklich euer ernst oder?

Macht euch mal bitte über Zugriffsmethoden, Unit-Schnittstellen und Zirkelschlüsse schlau.

Beispiel ist im Anhang.
Angehängte Dateien
Dateityp: zip lazarus_125.zip (2,7 KB, 8x aufgerufen)
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


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 17:12 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