myGully.com - C++, durch Button etwas einfügen

myGully.com (https://mygully.com/index.php)

- Programmierung (https://mygully.com/forumdisplay.php?f=67)

- - C++, durch Button etwas einfügen (https://mygully.com/showthread.php?t=2904172)

C++, durch Button etwas einfügen

Hallo Leute,

ich habe mal eine kleine Frage zum Angegebenen Titel:
" Durch Button etwas einfügen ".

Unswar möchte ich einfach durch einem Button - Klick z.B. ein Memo1 auf die Form Zaubern.

Beispiel:
Auf der Form ist NICHTS außer ein Button. Klickt man nun auf dem Button drauf, so wird
ein Memo1 auf der Position "X=100; Y=200" erstellt.

Der Button heißt in diesem Fall "Erstellen". Wenn dieses Memo1 erstellt wurde, soll im Button
automatisch der Text umgeändert werden. z.B. zu "Löschen".
Klickt man nun erneut auf dem Button ( jetzt "Löschen"), dann ändert sich der Text im
Button wieder in "Erstellen" und das Memo1 auf der Position "X=100; Y=200" wird gelöscht.

Arbeitsmittel:
Win7
RAD Studio XE3
(FireMonkey-Desktop-Anwendung - C++ Builder

Danke im Vorraus.

Was du suchst sind dynamische Objekte.

So könnte dein Code beispielsweise aussehen:

Code:

//---------------------------------------------------------------------------



#include <fmx.h>

#pragma hdrstop



#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.fmx"

TForm1 *Form1;

TMemo *memo = new TMemo(Form1);

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

        : TForm(Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)

{

        memo->Parent = Form1;

        memo->Visible = false;

        memo->Position->X = 10;

        memo->Position->Y = 10;

        memo->Width = 200;

        memo->Height = 140;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{



        if (Button1->Text == "Erstellen") {

                Button1->Text = "Löschen";

                memo->Visible = true;

        } else        if (Button1->Text == "Löschen") {

                Button1->Text = "Erstellen";

                memo->Visible = false;

        }

}

//---------------------------------------------------------------------------

void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)

{

        delete(memo);

}

//---------------------------------------------------------------------------

Wenn der Kompiler anzeigt, dass er "TMemo" nicht kennt, einfach mal eines aus der Toolbox auf die Form ziehen, kompilieren und das Memo wieder löschen.