Just nu i M3-nätverket
Gå till innehåll
Gunnar Slott

Skriva text till childwindow i delphi

Rekommendera Poster

Gunnar Slott

Försöker öppna en textfil i en MDI app i Delphi3. Delphi klagar på "Undeclered identifier:Memo1". Men Memorutan heter Memo1 (delphi default). Här kommer några rader kod som någon vänlig själ kanske kan hjälpa mig med.

 

if OpenDialog.Execute then

CreateMDIChild(OpenDialog.FileName);

ActiveMDIChild.Memo1.Lines.LoadFromFile (OpenDialog.FileName);

 

TIA Gunnar

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser
Simon Rodriguez

Hejsan!

 

1: Lägg till en Memo i "MainForm" och döp den till Temp och visible=false

2: Lägg till en Memo i "Childwindow" och döp den till NoUse och visible=false

3: I "OnClick" på Knappen eller vad det nu ska vara så skriver du följande:

 

MainForm.Temp.Lines.Clear;

MainForm.Temp.Lines.Add('DIN TEXT');

ActiveMDIChild.OnActivate(Sender);

 

4: I "OnActivate" på child fönstret skriver du följande:

 

NoUse.Lines.Clear;

If MainForm.Temp.Lines=NoUse.Lines then begin

end

else begin

DIN VISIBLA MEMO.Lines.AddStrings(MainForm.Temp.Lines);

MainForm.Temp.Lines.Clear;

end;

 

5: Klar!!!

 

About

-----

By: Simon Rodriguez (G-Force Studios)

Email: simon_rodriguez@mail.bip.net

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

Skapa ett konto eller logga in för att kommentera

Du måste vara medlem för att kunna kommentera

Skapa ett konto

Skapa ett nytt konto på vårt forum. Det är lätt!

Registrera ett nytt konto

Logga in

Redan medlem? Logga in här.

Logga in nu



×
×
  • Skapa nytt...