Delphi Learning Letters(Drei) – Ping Tool

Zwei Wochen vor dem Unternehmensnetzwerk-Architektur größeren Renovierungen,Busy Bee,Wenn Sie IP-Druckserver ändern,Es gibt zwei sehr krumm Maschine,Lassen Sie mich zunächst beginnen Wechsel,Später, nach der Änderung zum Besseren,Werden Sie eine lange Zeit der Inaktivität,Er wird zu brechen,Versuchte einen Tag,Schließlich Aufgeben,Ich schnappte mir ein kleines Programm,Legen Sie es auf den Server und lassen Sie das Programm den Druckserver alle 30 Sekunden pingen。

  後來就想嘗試寫出類似功能的程式,沒想到還真讓我給拼裝出來了,也就是今天要交的作業~Ping Tool

程式碼:

執行結果
主畫面

按下"倒數計時"鈕後,出現輸入時間的視窗

開始倒數計時

數到0時,會出現ping的視窗,前面程式碼裡寫ping兩次為的就只是讓這視窗出現,如果只ping一次,視窗出現隨即就不見,來不及看到內容

接著又回到剛輸入的數值繼續倒數

心得
  這次的程式功能很普通,算是偏重實用性的,寫完之後,感覺還不錯,因為從第一次出現想學程式的念頭時,為的就是希望能寫出自己想用的工具,事隔十多年,終於有個開始了

  比較可惜的是,這次算是用拼湊的方式完成,也就是先出現想法,再上網找語法怎麼用,有些都用複製貼上,因此感覺不夠融會貫通不過不斷try & error的過程多少還是有學到一些觀念,還是可接受啦~

Nachsatz:
  不知道為什麼執行檔有夠大,11MB 有空再來研究

Leave a Comment

Bitte beachten Sie,: Kommentar Moderation ist aktiviert und kann Ihren Kommentar verzögern. Es besteht keine Notwendigkeit zur Stellungnahme reichen Sie.