1樓：網友
and除了boolean運算外，這裡也表示 按位與 運算。
shr，右移。
getqwcode，計算漢字的區位碼，q 區碼，w，位碼。
offset 根據區位計算這個字在點陣庫f 中的位置。
blockread 根據offset 從 f 中讀出這個字的點陣資訊：32個位元組，存放在getstr裡面。
while，每次處理getstr 中的乙個位元組，取出後放在 temp 中。
for,每次處理 temp的乙個位。
dis:=temp and 128,就是取出這個位元組的最高位。
dis:=dis shr 7, 就是把這個最高位移到最低位。
for 迴圈的最後，temp:=temp shl 1,是把temp 左移一位。
整體上，就是從高到低，依次判斷temp中的每一位是否為1，如果是，就畫乙個點。gerstr中兩個位元組表示這個字的點陣的一行，由x來控制。
x,y分別控制點陣中點的座標。
至於為什麼右移，因為後面要判斷dis是否等於1，這是寫**的人的思路。
若不右移，也可以改成：
dis:=temp and 128
if dis=128 then
2樓：網友
我來解答一下，我也是現學現賣，呵呵：
and可以用作與運算，or可以用於或運算。
比如：procedure : tobject);
varb: dword;
beginb :=ffaa;
b :=b and $aa;
showmessage(inttohex(b,4));
end;這段**，執行時輸出"00aa".
shr是邏輯右移運算，比如0010，右移一位，就變成了0001，等於是除以2。 shr 7就等於dis 除以了 2的7次方。
用以下**可以驗證：
varb: dword;
beginb :=2;
b :=b shr 1;
showmessage(inttohex(b,4));
至於程式裡為什麼要這麼做，我也搞不懂了，反正是乙個演算法就對了。
補充：樓上大哥說的好。
對了，剛才想說，後來想不起來了。我也正在學delphi,建議你多看看它自帶的幫助，很有效。
delphi "="附近有語法錯誤。
3樓：網友
:= 'select formid, productid, productname, productsize, price, number, size ' +
from form2 ' +
where formid = ''' + formid + '''';
單引號和sql語句間最好都留乙個空格。
delphi菜鳥對基本語法的提問
4樓：網友
vcl中的published 屬性，表面是個「變數」一樣的屬性，實際是對應了兩個方法，set方法與get方法，乙個送值，乙個是取值。
delphi語法問題
5樓：
很明顯是括號的問題， add後面 有 兩個 左括號，而後面只有乙個 右括號。
delphi語法問題
6樓：網友
你是說if '密碼').asstring='111' then還是 if >0 then
如果是上面的那個 你就看看你資料裡面的密碼'密碼').asstring 是不是 111 是不是有空格 (111後面， 如果欄位定義成char 會自動補充) ,如果這樣 你就 trim( '密碼').asstring)
如果是後面的話 ,也就是。
select 編號，密碼 from 密碼 where 編號='''+'''') 查詢有問題。 是不是沒有查詢出來。 或者也是空格問題。
你自己檢查一下。 除錯模式 斷點跟蹤一下。 還是比較好分析的。
7樓：太平洋來的風
begin
select 編號，密碼 from 密碼 where 編號='''+'''');
if >0 then
beginif '密碼').asstring='111' thenbegin
showmessage('該員工沒有啟用，請繼續下面的操作。');
false;
endelse begin
showmessage('該員工已啟用，無需再次啟用。');
end;end;
我分析是你的這一句沒有 recordcount>0if >0 then
所以就直接執行 else 後面的。
我估計是問題：
select 編號，密碼 from 密碼 where 編號='''+trim('''');
在delphi sql語句中'附近有語法錯誤怎麼解決
8樓：網友
把你的sql語句在microsoft sql server management studio工具的查詢設計測試執行，沒有錯誤後再使用。
9樓：網友
sql語句沒寫正確唄，還能怎麼解決，修改你的sql語句啊。
delphi**現第一行：『=』附近有語法錯誤，怎麼解決？
10樓：匿名使用者
一般這樣的情況，就是你把：=寫成=造成的。改過來就好了。
11樓：匿名使用者
那就是有可能你語法不對。
你寫的是**能不能寫出來，好讓我們幫你看。
12樓：匿名使用者
是不是你把賦值：=寫成=號拉？
delphi 語法問題
13樓：網友
把第乙個'號和最後乙個'號刪除就正確，if ('field_name').asstring)) delphi 語法**不對？？暈死了 14樓：柳營笑者 主要就是運算子的優先順序還有就是運算的方向。這樣寫就沒有事了： (acol=3) and (arow=2) ,或者 (acol=3) and (arow=2) . 你可以編寫程式去了解delphi是怎麼去編譯運算子的。 這是換圖示形狀，不是移動。這個是滑鼠指標的狀態 形狀 delphi 小問題 var arr array of char s string p pchar i integer begins setlength arr,length s for i 1 to length s dobegin arr i... 速度和位移都有負值，兩者都是在規定正方向的情況下，速度的負值是於正方向相反的方向下運動，位移同理，兩者於其的負值是相對的。不是負值啊，只是方向與正方向速度相反。速度和位移都是向量，包括大小和方向，負值是指他們的方向與規定方向相反，大小還是正的。是相對的，首先要規定正方向，正負才有意義。負值是方向，1... 動詞 形 是主語為別人做了某事 前面的動詞是主語的行為，所以吃飯的人是主語 而動詞 形 是主語請別人做某事，這裡 前面動詞是被請求的人的行為 所以休息的人不是我 我給朋友飯吃 友達 飯 食 我幫朋友把飯吃了 友達 飯 食 明天我想讓你給我請假 你這句話有歧義哦.如果是 明天我想請你讓我休息 明日休 ...Delphi的小問題，delphi 小問題
速度和位移的正負問題
日語語法的問題，日語語法問題