Also ich weiß echt nicht weiter hab mir den Quelltext jetzt schon drei mal durchgeguckt.Vielleicht findet ihr etwas.Ich glaube eher,dass ich etwas weggelassen habe was wichtig ist.Naja schaut selbst:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var squellcode:'
unit Unit1'+sLinebreak+
'
interface'+slinebreak+
'
uses'+slinebreak+
'
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs'+slinebreak+
'
type'+slinebreak+
'
TForm1 = class(TForm)'+slinebreak+
'
private'+slinebreak+
'
{ Private-Deklarationen }'+slinebreak+
'
public'+
'
{ Public-Deklarationen }'+slinebreak+
'
end;'+slinebreak+
'
var'+slinebreak+
'
Form1: TForm1;'+slinebreak+
'
implementation'+slinebreak+
'
{$R *.dfm}'+slinebreak+
'
procedure xyz(Sender :TObject);'+slinebreak+
....
....
'
end.';
PS:@Tun das Altautos nicht?