ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ Π°Π»Π³ΠΎΡΠΈΡΠΌΠ° ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ
Π ΠΈΡΡΠ½ΠΎΠΊ 2. ΠΡΠ±ΠΎΡ ΡΡΡΠΎΠΊΠΈ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΡ ΠΠ°ΡΠ΅ΠΌ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ «ΠΡΡΠΎΡΠ½ΠΈΠΊ Π΄Π°Π½Π½ΡΡ ΠΊΠΎΠΌΠΏΡΡΡΠ΅ΡΠ°» ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ «Π‘ΠΎΠ·Π΄Π°ΡΡ». Π’ΠΈΠΏ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ° Π΄Π°Π½Π½ΡΡ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»ΡΡΠΊΠΈΠΉ ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ Π½Π° ΠΊΠ½ΠΎΠΏΠΊΡ «ΠΠ°Π»Π΅Π΅». ΠΡΠ±ΠΈΡΠ°Π΅ΠΌ Π΄ΡΠ°ΠΉΠ²Π΅Ρ MySQL ODBC 5.2 UnicodeDriver ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ «ΠΠΎΡΠΎΠ²ΠΎ». ΠΠ°Π»Π΅Π΅ ΠΏΡΠΎΠΏΠΈΡΡΠ²Π°Π΅ΠΌ ΡΠ²ΠΎΠ΅ DataSourceName, ΠΏΡΠΎΠΏΠΈΡΡΠ²Π°Π΅ΠΌ TCPIP server:192.168.56.101 Π·Π°Π΄Π°Π΅ΠΌ ΠΈΠΌΡ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Ρ ΠΈ ΠΏΠ°ΡΠΎΠ»Ρ, Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ ΡΠ²ΠΎΡ Π±Π°Π·Ρ Π² ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΠ΅… Π§ΠΈΡΠ°ΡΡ Π΅ΡΡ >
ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ Π°Π»Π³ΠΎΡΠΈΡΠΌΠ° ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ (ΡΠ΅ΡΠ΅ΡΠ°Ρ, ΠΊΡΡΡΠΎΠ²Π°Ρ, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½ΡΡΠΎΠ»ΡΠ½Π°Ρ)
Π°Π²ΡΠΎΠΌΠ°ΡΠΈΠ·ΠΈΡΠΎΠ²Π°Π½Π½Π°Ρ ΠΈΠ½ΡΠΎΡΠΌΠ°ΡΠΈΠΎΠ½Π½Π°Ρ ΡΠΈΡΡΠ΅ΠΌΠ° ΠΠ»Ρ ΠΎΠ±Π΅ΡΠΏΠ΅ΡΠ΅Π½ΠΈΡ ΡΠ°Π±ΠΎΡΡ Π½Π°ΡΠ΅ΠΉ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ ΠΈ Π±Π°Π·Ρ Π΄Π°Π½Π½ΡΡ Π½Π° SQL-ΡΠ΅ΡΠ²Π΅ΡΠ΅, ΠΌΡ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΠ»ΠΈ Π²ΡΠ΅ ΡΡΠ΅Π±ΡΡΡΠΈΠ΅ΡΡ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΡ. Π‘ΠΎΠ·Π΄Π°Π»ΠΈ Π±Π°Π·Ρ Π² MySQL, Π° ΡΠ°ΠΊΠΆΠ΅ ΡΠ°Π±Π»ΠΈΡΡ, ΠΏΡΠΎΠΏΠΈΡΠ°Π»ΠΈ ΡΠ²ΠΎΠΉΡΡΠ²Π° ΠΏΠΎΠ»Π΅ΠΉ ΠΈ ΠΊΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ Π²Π²ΠΎΠ΄ΠΈΠΌΡΡ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠ². ΠΠΎΡΠ»Π΅ ΡΠ΅Π³ΠΎ ΡΠΎΠ΅Π΄ΠΈΠ½ΠΈΠ»ΠΈ ΡΡΡ Π±Π°Π·Ρ Ρ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΠΎΠΌ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ Delphi. Π Delphi ΡΠ°Π·ΡΠ°Π±ΠΎΡΠ°Π»ΠΈ ΡΠΎΡΠΌΡ Π΄Π»Ρ Π½Π°ΡΠ΅Π³ΠΎ ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΡ.
Π‘ΠΈΡΡΠ΅ΠΌΠ° ΡΠΎΡΡΠΎΠΈΡ ΠΈΠ· 8 ΡΠΎΡΠΌ, ΠΊΠΎΡΠΎΡΡΠ΅ Π²Π·Π°ΠΈΠΌΠΎΡΠ²ΡΠ·Π°Π½Ρ ΠΌΠ΅ΠΆΠ΄Ρ ΡΠΎΠ±ΠΎΠΉ. Π’Π°ΠΊ ΠΆΠ΅ Π΅ΡΡΡ ΡΠ²ΡΠ·Ρ Ρ SQL-ΡΠ΅ΡΠ²Π΅ΡΠΎΠΌ ΠΏΡΠΈ ΠΏΠΎΠΌΠΎΡΠΈ DataSource, AdoQuery ΠΈ AdoConnection.
DataSource — ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΡΡΡ Π΄Π»Ρ ΡΠ²ΡΠ·ΠΈ Π΄Π°Π½Π½ΡΡ Ρ ΡΠ»Π΅ΠΌΠ΅Π½ΡΠΎΠΌ Π²ΡΠ²ΠΎΠ΄Π°. ΠΠ°ΠΏΡΠΈΠΌΠ΅Ρ: DbGrid. AdoQuery — ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½Ρ Π½Π°Π±ΠΎΡΠ° Π΄Π°Π½Π½ΡΡ , Π²ΡΠΏΠΎΠ»Π½ΡΡΡΠΈΠΉ Π·Π°ΠΏΡΠΎΡΡ SQL.
AdoConnection — ΡΠΎΠ΅Π΄ΠΈΠ½Π΅Π½ΠΈΠ΅ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΠΎΠ² Ρ Π±Π°Π·Π°ΠΌΠΈ Π΄Π°Π½Π½ΡΡ . ΠΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌ ΡΠ²ΠΎΠΉΡΡΠ²ΠΎ ConnectoinString, Π΄Π»Ρ ΡΡΠΎΠ³ΠΎ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ Π½Π° ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½Ρ «…», Π΄Π°Π»Π΅Π΅ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ UseConnectionString ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ Π½Π° ΠΊΠ½ΠΎΠΏΠΊΡ Build (Π ΠΈΡ.1).
Π ΠΈΡΡΠ½ΠΎΠΊ 1. Π‘ΠΎΠ΅Π΄ΠΈΠ½Π΅Π½ΠΈΠ΅ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΠΎΠ² Ρ ΠΠ ΠΠ°Π»Π΅Π΅ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ «ΠΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΡΡΡΠΎΠΊΡ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΡ» ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ «Π‘Π±ΠΎΡΠΊΠ°» (Π ΠΈΡ. 2).
Π ΠΈΡΡΠ½ΠΎΠΊ 2. ΠΡΠ±ΠΎΡ ΡΡΡΠΎΠΊΠΈ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΡ ΠΠ°ΡΠ΅ΠΌ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ «ΠΡΡΠΎΡΠ½ΠΈΠΊ Π΄Π°Π½Π½ΡΡ ΠΊΠΎΠΌΠΏΡΡΡΠ΅ΡΠ°» ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ «Π‘ΠΎΠ·Π΄Π°ΡΡ». Π’ΠΈΠΏ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ° Π΄Π°Π½Π½ΡΡ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»ΡΡΠΊΠΈΠΉ ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ Π½Π° ΠΊΠ½ΠΎΠΏΠΊΡ «ΠΠ°Π»Π΅Π΅». ΠΡΠ±ΠΈΡΠ°Π΅ΠΌ Π΄ΡΠ°ΠΉΠ²Π΅Ρ MySQL ODBC 5.2 UnicodeDriver ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ «ΠΠΎΡΠΎΠ²ΠΎ». ΠΠ°Π»Π΅Π΅ ΠΏΡΠΎΠΏΠΈΡΡΠ²Π°Π΅ΠΌ ΡΠ²ΠΎΠ΅ DataSourceName, ΠΏΡΠΎΠΏΠΈΡΡΠ²Π°Π΅ΠΌ TCPIP server:192.168.56.101 Π·Π°Π΄Π°Π΅ΠΌ ΠΈΠΌΡ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Ρ ΠΈ ΠΏΠ°ΡΠΎΠ»Ρ, Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ ΡΠ²ΠΎΡ Π±Π°Π·Ρ Π² ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΠ΅ DataBase, ΠΏΡΠΎΠ²Π΅ΡΡΠ΅ΠΌ Test ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ OK. ΠΡΠ±ΠΈΡΠ°Π΅ΠΌ ΡΠ²ΠΎΠΉ ΡΠΎΠ·Π΄Π°Π½Π½ΡΠΉ ΠΈΡΡΠΎΡΠ½ΠΈΠΊ Π΄Π°Π½Π½ΡΡ ΠΈ Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ Π΄Π²Π° ΡΠ°Π·Π° Ok. Π‘ΡΠ°Π²ΠΈΠΌ Π³Π°Π»ΠΎΡΠΊΡ «Π Π°Π·ΡΠ΅ΡΠΈΡΡ ΡΠΎΡ ΡΠ°Π½Π΅Π½ΠΈΠ΅ ΠΏΠ°ΡΠΎΠ»Ρ» ΠΈ ΠΏΡΠΎΠ²Π΅ΡΡΠ΅ΠΌ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΠ΅, Π΅ΡΠ»ΠΈ Π²ΡΠ΅ Π²ΡΠΏΠΎΠ»Π½Π΅Π½ΠΎ ΡΡΠΏΠ΅ΡΠ½ΠΎ, Π½Π°ΠΆΠΈΠΌΠ°Π΅ΠΌ Π΄Π²Π° ΡΠ°Π·Π° ΠΠ. Π’Π΅ΠΏΠ΅ΡΡ ΠΌΡ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠΈΠ»ΠΈ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ Delphi Ρ SQL-ΡΠ΅ΡΠ²Π΅ΡΠΎΠΌ Π±Π°Π·ΠΎΠΉ Π΄Π°Π½Π½ΡΡ (Π ΠΈΡ. 3).
Π ΠΈΡΡΠ½ΠΎΠΊ 3. ΠΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΠ΅ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ Delphi Ρ SQL-ΡΠ΅ΡΠ²Π΅ΡΠΎΠΌ ΠΠ»Ρ ΡΠΎΠ³ΠΎ ΡΡΠΎΠ±Ρ ΠΊΠ°ΠΆΠ΄ΡΠΉ ΡΠ°Π· Π½Π΅ Π²Π²ΠΎΠ΄ΠΈΡΡ Π΄Π°Π½Π½ΡΠ΅ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Ρ ΠΈ Π΅Π³ΠΎ ΠΏΠ°ΡΠΎΠ»Ρ, ΠΌΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌ ΡΠ²ΠΎΠΉΡΡΠ²ΠΎ LoginPrompt, Π³Π΄Π΅ Π²ΡΠ±ΠΈΡΠ°Π΅ΠΌ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½Ρ False.
ΠΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌ ΠΎΠ΄ΠΈΠ½ ADOConnection Π΄Π»Ρ ΡΠΎΠ³ΠΎ ΡΡΠΎΠ±Ρ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ Π»Π΅Π³ΠΊΠΎ ΠΌΠΎΠΆΠ½ΠΎ Π±ΡΠ»ΠΎ ΠΏΠ΅ΡΠ΅Π½Π°ΡΡΡΠ°ΠΈΠ²Π°ΡΡ, Π° ΡΠ°ΠΊΠΆΠ΅ Π΄Π»Ρ Π²ΠΈΠ΄ΠΈΠΌΠΎΡΡΠΈ Π΅Π³ΠΎ Π½Π° Π²ΡΠ΅Ρ ΡΠΎΡΠΌΠ°Ρ «Uses». ΠΠ»Ρ ΡΡΠΎΠ³ΠΎ ΠΌΡ ΠΏΡΠΎΠΏΠΈΡΡΠ²Π°Π΅ΠΌ Π² ΠΊΠ°ΠΆΠ΄ΠΎΠΉ ΡΠΎΡΠΌΠ΅ ΡΠ²ΠΎΠΉΡΡΠ²ΠΎ Implementation uses unit1.