das ganze könnte etwa so aussehen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if form2.showmodal=mrok
then
if form3.showmodal=mrok
then
memo1.lines.add('
[url="'+form2.edit1.text+'
"]'+form3.edit1.text+'
[/url]');
end;
dazu musst du beim uses bereich von form1 form2 und form3 eintragen am besten über Datei|
Unit verwenden
und bei den ok buttons von form2 und 3 modalresult auf mrok und bei den abbrechen buttons modalresult auf mrcancel stellen (objectinspector)
mfg Blizzard