各位大德,您好!
我用 MySql ODBC 5.1 MySql 版本 5.0.45 Delphi5 ADOquery 來連MySql資料庫
資料 顯示沒問題,但在前端下SQL指令搜尋某一中文, 卻搜不到
如:
edit1.text 輸入值是 '李維'

ADOquery1.close;
ADOquery1.sql.clear;
ADOQuery1.sql.Add('select * from TALBENAME');
ADOquery1.sql.Add('where NAME=:x_name ');
ADOquery1.Parameters.ParamByName('x_name').value:=edit1.text;
ADOquery1.open;

MYSQL相關設定如下:
character_set_client UTF8
character_set_server UTF8
character_set_connection UTF8
collation_connection utf8_general_ci
collation_database big5_chinese_ci
collation_server utf8_general_ci
character_set_database BIG5

資料庫有這筆資料,但卻搜不到,不曉得是何原因
請有經驗的大德不吝指教,謝謝!

你要不要先用SQL-Explore下你的select命令,
如果有資料,就是你的程式有問題
如果沒資料,就是你的資料庫設定的問題

謝謝大德的回覆, 在後端用select 搜是 OK的,
但在前端用下列程式碼來搜卻找不到資料, 程式碼如下,應該沒錯, 但不知是何原因搜不到
ADOquery1.close;
ADOquery1.sql.clear;
ADOQuery1.sql.Add('select * from TALBENAME');
ADOquery1.sql.Add('where NAME=:x_name ');
ADOquery1.Parameters.ParamByName('x_name').value:=edit1.text;
ADOquery1.open;

tablename跟where之間是不是少了空格?

===================引 用 joana 文 章===================
謝謝大德的回覆, 在後端用select 搜是 OK的,
但在前端用下列程式碼來搜卻找不到資料, 程式碼如下,應該沒錯, 但不知是何原因搜不到
ADOquery1.close;
ADOquery1.sql.clear;
ADOQuery1.sql.Add('select * from TALBENAME');
ADOquery1.sql.Add('where NAME=:x_name ');
ADOquery1.Parameters.ParamByName('x_name').value:=edit1.text;
ADOquery1.open;

Try It-->
procedure StrToClipbrd(StrValue: string);
var
S: string;
hMem: THandle;
pMem: PChar;
begin
hMem := GlobalAlloc(GHND or GMEM_SHARE, Length(StrValue) 1);
if hMem <> 0 then
begin
pMem := GlobalLock(hMem);
if pMem <> nil then
begin
StrPCopy(pMem, StrValue);
GlobalUnlock(hMem);
if OpenClipboard(0) then
begin
EmptyClipboard;
SetClipboardData(CF_TEXT, hMem);
CloseClipboard;
end
else
GlobalFree(hMem);
end
else
GlobalFree(hMem)
end;
end;
....
....

ADOQuery1.sql.Text:='select * from TALBENAME';
ADOquery1.sql.Add(Format('where NAME=''%S''',[Edit1.Text]);
StrtoClipBrd(ADOQuery1.SQL.Text);
ADOquery1.Open;
-->您可以將該 SQL 貼到 SQL Explorer 看資料 顯示有沒有問題
===================引 用 joana 文 章===================
謝謝大德的回覆, 在後端用select 搜是 OK的,
但在前端用下列程式碼來搜卻找不到資料, 程式碼如下,應該沒錯, 但不知是何原因搜不到
ADOquery1.close;
ADOquery1.sql.clear;
ADOQuery1.sql.Add('select * from TALBENAME');
ADOquery1.sql.Add('where NAME=:x_name ');
ADOquery1.Parameters.ParamByName('x_name').value:=edit1.text;
ADOquery1.open;

===================引 用 joana 文 章===================
謝謝大德的回覆, 在後端用select 搜是 OK的,
但在前端用下列程式碼來搜卻找不到資料, 程式碼如下,應該沒錯, 但不知是何原因搜不到
ADOquery1.close;
ADOquery1.sql.clear;
ADOQuery1.sql.Add('select * from TALBENAME');
ADOquery1.sql.Add('where NAME=:x_name ');
ADOquery1.Parameters.ParamByName('x_name').value:=edit1.text;
ADOquery1.open;

------
What do we live for if not to make life less difficult for each other?

謝謝Christie大德的回覆, 末學笨拙,不知大德這段程式在做什麼,可否請大德
解析一下, 感激不盡!

christie 之意為 String To clipboard

你可以試試看把 string 複製到 clipboard
再貼到記事本
查看一下有沒有問題 !!

------
Just Do It
-------------------------
其實男生不是真的喜歡你不減肥，而是喜歡你愛吃還不肥；也不是真的喜歡你不化妝，而是喜歡你素顏也好看；也不是真的喜歡你瘦，而是喜歡你瘦卻有胸；也不是真喜歡你獨立，而是他忙的時候別煩他。女孩子，太認真你就輸了。