This delphi 7 source code have a function to send SMS trough computer with serial communication. You can modify it for your requirement.