unit unit1;
inte***ce
uses
windows, messages, sysutils, variants, classes, graphics, controls, forms,
dialogs, stdctrls, extctrls;
type
tform1 = class(tform)
timer1: ttimer;
memo1: tmemo;
procedure timer1timer(sender: tobject);
private
public
end;
varform1: tform1;
implementation
procedure tform1.timer1timer(sender: tobject);
vari: integer;
begin
for i:=65 to 90 do
begin
if (getasynckeystate(i)=-32767) then
if (i>=65) and (i<=90) then
memo1.text:=memo1.text+char(i);
end;
end;
end
不是很牛批的重構
記錄工作中遇到的小重構 void fun const type data,const type2 data2,type3 data3 重用上面的 變成兩個介面 void implement const type data,const type2 data2,int req,int band void...
機械鍵盤不是必選項
前幾天我面試乙個碼農，連續幾個專業問題他都沒答上來。尷尬之餘，我問他 你沒有什麼理想嗎？你現在最渴望得到的是什麼？碼農轉悠著大眼睛，不假思索道 買個機械鍵盤！真沒想到在面試中居然還有這種操作。我問為什麼這能成為現階段最渴望的東西，他反問 你就沒有寫 寫的手疼的夜晚嗎？寂寞長夜，總想輕輕鬆鬆的寫 寬慰...
機械鍵盤不是必選項
前幾天我面試乙個碼農，連續幾個專業問題他都沒答上來。尷尬之餘，我問他 你沒有什麼理想嗎？你現在最渴望得到的是什麼？碼農轉悠著大眼睛，不假思索道 買個機械鍵盤！真沒想到在面試中居然還有這種操作。我問為什麼這能成為現階段最渴望的東西，他反問 你就沒有寫 寫的手疼的夜晚嗎？寂寞長夜，總想輕輕鬆鬆的寫 寬慰...