在前段時間寫的收銀系統中由于目前市場上很多電腦主板上已經沒有并口，而POS機卻又需要并口，所以目前需要用PCI轉接卡，這個就導致不同門店使用的端口就有可能不同，這就給我們程序中彈出錢箱的指令帶來一定的難度。所以就通過獲取Window自帶的默認，得出打印機信息。 在Windows文件下有個win.ini，里面自帶默認打印機的信息。通過調用API函數Getprofilestring這個函數獲取打印機信息。 在界面上拖個button，在其單擊事件中寫： procedure TForm1.Btn1Click(Sender: TObject);
var
????AppName : Array [0..256] of Char;????//節名稱字符串
????KeyName : Array [0..256] of Char; //鍵名稱字符串
????DefaultString : Array [0..256] of Char; //在鍵名沒找到時默認返回的字串
????ReturnedString : Array [0..256] of Char; //在鍵名找到時返回的字串
begin
????AppName := 'Windows';//節名稱
????KeyName := 'device';????//鍵名稱
????GetProfileString(AppName,KeyName,DefaultString,ReturnedString,Sizeof(ReturnedString));
????ShowMessage(ReturnedString);
end;

轉載于:https://www.cnblogs.com/chenbg2001/archive/2009/08/29/1556446.html

總結

以上是生活随笔為你收集整理的Delphi获取默认打印机名称及端口的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。