這是我學delphi的第乙個程式,做的不好,請多加原諒!
借用了我的乙個好朋友(夏華偉先生)的簡介編寫出來的個人簡歷,很簡陋。用showmessage直接編寫,所以極其簡單,程式**如下:
unit unit1;
inte***ce
uses
windows, messages, sysutils, variants, classes, graphics, controls, forms,
dialogs, stdctrls, winskindata, jpeg, extctrls, menus;
type
tform1 = class(tform)
button1: tbutton;
skindata1: tskindata;
button2: tbutton;
label1: tlabel;
image1: timage;
mainmenu1: tmainmenu;
n1: tmenuitem;
n2: tmenuitem;
procedure button1click(sender: tobject);
procedure button2click(sender: tobject);
procedure n2click(sender: tobject);
private
public
end;
varform1: tform1;
implementation
uses unit2;
procedure tform1.button1click(sender: tobject);
begin
showmessage('此人名叫夏華偉');
showmessage('性別:男');
showmessage('年齡:24');
showmessage('婚否:未');
showmessage('大概就那麼多了,時間不等人,就此終止吧');
end;
procedure tform1.button2click(sender: tobject);
begin
close;
end;
procedure tform1.n2click(sender: tobject);
begin
form2.showmodal;
end;
end.
+++++++++ 寫於 2004 .5.25 日++++++++++
早期 Web 控制項的嘗試
選項卡,又稱 標籤頁 英文中有統一名稱,謂之 tab。tab 是一種常見的控制項,能夠有效地利用空間而廣泛使用。開發過程中遇到的問題。如果候選欄出現下面的錯位,那麼請在 tab 容器前面加入乙個換行符 因為 tabs 是乙個 dom 佇列,所以必須保證佇列間不能插入非 tab 標籤,即使 也不行,否...
將「早期版本的Windows」改名
將 早期版本的windows 改名,並修改系統等待時間 問題描述 先裝windows xp,再裝windows 7,啟動選單會出現 早期版本的windows 與 windows 7 兩個選項條。希望將 早期版本的windows 改名為 windows xp 並將等待時間改為5秒。實現方法 1 改名 ...
從早期 Spring Boot 版本公升級
當乙個新的版本發布的時候,一些屬性可能會被重新命名或者刪除。spring boot 同時也提供了乙個供你分析你應用程式環境和在啟動的時候列印診斷資訊的方法,同時還嘗試幫助你在執行的時候為你整合屬性。如果你希望啟用這個特性,請在你的專案中新增下面的依賴 dependency groupid org.s...