unit TestUnit1; uses 'TestUnit 2'; function main: string; begin Result := TestUnit2Func; end; end.
虫虫下载站 半导体技术网 电子研发网 源码地带 电源技术网 单片机技术网 医疗电子技术 嵌入式系统与单片机