@Mavarik: Naja, außer der TextBox-Klasse sieht mir das doch etwas zu sehr nach
Win32 aus
. Selbst wenn man das sinngemäß übersetzte, könnte es nicht funktionieren, da alle Controls unter .Net standardmäßig - Gott sei Dank - private sind (hoffentlich kommt jetzt nicht wieder irgendjemand und sagt, dass dem mit Delphi.Net nicht so sei
).
Delphi-Quellcode:
SubForm = class(Form)
private
textBox: TextBox;
components: System.ComponentModel.Container := nil;
method InitializeComponent;
protected
method Dispose(aDisposing: boolean); override;
public
constructor;
property ResultText : String read textBox.Text;
end;
[...]
using sub := new SubForm() do
begin
sub.ShowDialog();
MessageBox.Show(sub.ResultText);
end;
@gfjs: PN kommt die nächsten Tage
.