>>444
説明が足らずに申し訳ありませんでした。

一晩考えて、こうしてみました。

static void sub(int argc, char **argv)
{
for (int i(0); i < argc; ++i)
ShowMessage(*argv++);
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString as("This is sample string");
TStringList* listp(new TStringList);
for (int i(as.AnsiPos(' ')); 0 < i; i = as.AnsiPos(' ')) {
listp->Add(as.SubString(1, i - 1));
as = as.Delete(1, i);
}
listp->Add(as);

int argcnt(listp->Count);
char** argvp((char**)malloc(argcnt * sizeof(char*)));
for (int i(0); i < argcnt; ++i)
argvp[i] = listp->Strings[i].c_str();

sub(argcnt, argvp);
delete(listp);
}

何かおかしい点またはこうした方がいいという点がありましたら
引き続きご指導宜しくお願いします。