0181 0911
dgdfgfgfggf▒░°±�€��’ƒ„…†‡ˆ‰Š‹Œ�Ž��‘’
“”•9–—˜™š›œ
žŸ ¡¢£¤¥¦§¨©ª«¬®¯°±²³´µ¶µ¶·¸¹º»¼½¾
ΏϟϞ¿ÀϞϟϠΏΏϟϟΏ¿ÀÁÂÃÄÅÆÇÈÞÈÉÊËÌÍÎÏ�××
procedure
TForm1.Button1Click(Sender:
TObject);<br />
begin<br />
ADOConnection1.ConnectionString
:=
'Server=Hostname;DataBase=DatabaseN
ame';<br />
ADOConnection1.Open('UserName',
'Password');<br />
ADOConnection1.Connected :=
True;<br />
end;<br />