{"id":202,"date":"2017-09-06T11:58:20","date_gmt":"2017-09-06T11:58:20","guid":{"rendered":"http:\/\/hahne-software.de\/?p=202"},"modified":"2017-09-06T11:58:31","modified_gmt":"2017-09-06T11:58:31","slug":"tstorageprovider-fuer-ado-verwenden","status":"publish","type":"post","link":"https:\/\/hahne-software.de\/?p=202","title":{"rendered":"TStorageProvider f\u00fcr ADO verwenden"},"content":{"rendered":"<p>Verwendung von\u00a0TStorageProviderADODB mit einer MS ACCESS Datenbank:<\/p>\n<pre>uses\u00a0SOUnit,SOStorageProviderADOUnit,ADODB;\r\n.\r\n.\r\n.\r\nvar sp : TStorageProviderADODB;\r\n    adoConn : TADOConnection;\r\n\r\nprocedure TForm1.OpenDatabase;\r\n\r\nbegin\r\n  \/\/ ADOConnection anlegen\r\n\r\n  adoConn:=TADOConnection.Create(nil);\r\n  adoConn.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\"' + \r\n                            ExtractFilePath(Application.ExeName) + 'test.mdb\";Persist Security Info=False'\r\n\r\n  \/\/ StorageProvider initialisieren\r\n\u00a0 \r\n  sp := TStorageProviderADODB.Create(adoConn);\r\n  sp.SetDBType(dbtAccess, 0); \/\/ 0 = Version der Datenbank -&gt; keine Vorgabe.\r\n\r\n  \/\/ Verbindung \u00f6ffnen\r\n  \r\n  sp.Open;\r\nend;<\/pre>\n<p>&nbsp;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Verwendung von\u00a0TStorageProviderADODB mit einer MS ACCESS Datenbank: uses\u00a0SOUnit,SOStorageProviderADOUnit,ADODB; . . . var sp : TStorageProviderADODB; adoConn : TADOConnection; procedure TForm1.OpenDatabase; begin \/\/ ADOConnection anlegen adoConn:=TADOConnection.Create(nil); adoConn.ConnectionString:=&#8217;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=&#8220;&#8218; + ExtractFilePath(Application.ExeName) + &#8218;test.mdb&#8220;;Persist Security Info=False&#8216; \/\/ StorageProvider initialisieren \u00a0 sp := TStorageProviderADODB.Create(adoConn); sp.SetDBType(dbtAccess, 0); \/\/ 0 = Version der Datenbank -&gt; keine Vorgabe. \/\/ Verbindung \u00f6ffnen sp.Open; [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6,3],"tags":[],"class_list":["post-202","post","type-post","status-publish","format-standard","hentry","category-delphi","category-storableobjects"],"blocksy_meta":[],"_links":{"self":[{"href":"https:\/\/hahne-software.de\/index.php?rest_route=\/wp\/v2\/posts\/202","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/hahne-software.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/hahne-software.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/hahne-software.de\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/hahne-software.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=202"}],"version-history":[{"count":1,"href":"https:\/\/hahne-software.de\/index.php?rest_route=\/wp\/v2\/posts\/202\/revisions"}],"predecessor-version":[{"id":203,"href":"https:\/\/hahne-software.de\/index.php?rest_route=\/wp\/v2\/posts\/202\/revisions\/203"}],"wp:attachment":[{"href":"https:\/\/hahne-software.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=202"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/hahne-software.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=202"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/hahne-software.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=202"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}