Damit...
Delphi-Quellcode:
{...}
readln(st);
sl := TStringList.Create;
sl.Add('@set input='+st);
sl.SaveToFile('i.bat');
sl.Free;
end.
und damit...
Zitat:
@echo off
input Try it!
call i.bat
del i.bat
echo ______________
echo.
echo Try: %input%
set input=
geht es... für meinen Geschmack etwas dirty... aber wohl die schnellste Lösung