Projení formulářů, resp.načtení dat z jednoho do druhého – Delphi – Fórum – Programujte.com

Dobrý den, jsem začátečník a potřeboval bych poradit, jak v Delphi načíst např text z Mema jednoho formuláře do Mema na dalším formuláři. Formulář jsem si dopsal do sekce uses.
Logicky bych to delal takhle ale nefunguje to:-(

procedure TForm1.Memo1Change(Sender: TObject);
begin
Memo1.Lines:=Temata.Memo1.Lines; //Temata je nazev predchoziho formulare
end;

Pokud tomu dobře rozumím, tak chceš text který zrovna píšeš v jednom memu přenést do druhého na jiném formuláři. V tom případě to máš pochopitelně špatně, protože uvedená procedura dělá to, že jakmile něco napíšeš ve Form1.Memo1 tak je to okamžitě přepsáno obsahem Temata.Memo1. Takže správně by to mělo být takhle:

procedure TTemata.Memo1Change(Sender: TObject);

begin

Form1.Memo1.Lines := Memo1.Lines;

end; 



nebo:



procedure TForm1.Memo1Change(Sender: TObject);

begin

Temata.Memo1.Lines := Memo1.Lines;

end; 

Memo1.Text := Form2.Memo1.Text;

Memo1.Lines.Assign(Form2.Memo1.Lines);

Memo1.Lines := Form2.Memo1.Lines;

...