#99 Article 470 Posted at 1992/09/23 02:15:58 by てこ (MAP2384) [Q.PASCAL]
Subject: Re:*32 まだ登録書も出してないパスカルの質問。 /469 .......... /433 /432
マニュアルとにらめっこしてて気がついたんですけど、
これだと
{$M 14000,0,0}
{減らしてみました（笑）}
uses Dos,Vram;
var opt,s:string; i:integer;
begin
if ParamCount < 1 then Exit;
opt := '-zs ';
for I := 1 to ParamCount do
s := ParamStr(I);
opt := (opt+s);
Writeln(s); {深い意味はないです（笑）}
exec(fsearch('ml1w.exe ',getEnv('PATH')),opt);
Pal( 0,0,0,0);
中略。
Pal(15,7,7,7);
end.
なにか不具合みたいなものあるでしょうか？
（パラメータ無しでパレット変えてくれませんし、
（あれでどうしてパレット変えてくれるのかわかんないです（笑）＞桑野さん。）
複数のファイル指定してもあいだのスペースひろてくんないですけど
（ＦＤには $m で、コマンドラインでは * すれば良いですもの））
このほうがあたしにはわかりやすいです。
何か「プログラム”技術”」って感じの
内容になってきた・・・かな？（笑）
てこMAP2384