在delphi中怎么调用tc编译环境？？

Question

怎么没人回答呀？？ 我是一个delphi新手，现在急着用，请各位帮帮忙！！

Answer 1

是外部调用吗？Edit1.Text用来-》if OpenDialog1.ExeCute then 
begin  
Edit1.Text := OpenDialog1.Filename;  
end; 就
No.1WinExec(PChar('tc' + Edit1.Text), SW_SHOW);No.2 //建议使用
uses
ShellApi;ShellExecuute(Handle, 'OPEN', PChar(Edit1.Text), nil, nil, SW_SHOW);

Answer 2

可以使用命令行编译器，将输出倒入一个文本文件，再在Delphi中读取。
winexec('tcc.exe aa.c>c:\CompInfo.txt');
Memo1.lines.clear;
memo1.lines.loadfromfile('c:\CompInfo.txt');

Answer 3

前面这些不好用呀！！我想用的是调用tc编译一个已存在的*.c文件，请各位指教！！