Mam pytanie wyczytalem w "Kompendium programisty" jak korzystac z bazy danych z tabelami ale nie mam pojecia jak zrobic wlasna baze z jakas tabela? Chodzi mi o utworzenie pliku np Baza.DB i umieszczenie w nim jakiejs tabeli a pozniej prace na tym pliku z komponentami TTable , TSource i TDbGrid. Pytane moze i trywialne ale jak dla kogos kto nigdy czegos takiego nie robil to w sam raz na poczatek.
Z kodu źródłowego można to zrobić np jak poniżej:
var
sc_programu : string;
begin
sc_programu:=ExtractFilePath(ParamStr(0));
// ścieżka do bazy danych
Table1.DatabaseName := sc_programu + 'baza\';
// ustawienie nazwy bazy
Table1.TableName := 'baza.dbf';
with Table1 do
begin
Active := False;
TableType := ttDBase;
with FieldDefs do
begin
Clear;
Add('NR', ftString, 10, true);
Add('Pole1', ftString, 200, false);
Add('Pole2', ftString, 200, false);
Add('Pole3', ftString, 50, false);
end;
// indeksy bazy danych
with IndexDefs do
begin
Clear;
Add('', 'NR', [ixPrimary, ixUnique]);
end;
end;
//utworzenie tabeli
Table1.CreateTable;
//otwarcie tabeli
Table1.Open;
end;
:)
Zobacz też:
Tworzenie książki adresowej z wykorzystaniem komponentów BDE
LUB:
Tabele tworzysz w Database Desktop dołączonym do Delphi.
Wchodzisz do niego i dajesz na:
- File
-- New
---Table
A potem np. Paradox 7
Field Name - nazwa pola np. Nazwisko
Type - jakiego typu te pole np. Alpha (poczytaj o typach danych, bo to WAŻNE!!!)
Size - długość danej
Key - czy to ma być pole z kluczem
Stwórz kilka pól i daj na Save As...
Potem zapisz bazę do folderu z przyszłym twoim programem.
Odpal Delphi i na gormę postaw 4 komponenty takie jak:
- TDbgrid
- TTable
- TDatasource
- TDBNavigator
W TTable we właściwości DatabaseName podaj ścieżkę do utworzonej bazy np: C:\Baza.db.
We własciwości TableName tego komponentu ustaw bazę.
W TDatasource we właściwości DataSet ustaw Table1.
W TDBNavigator we właściwości Datasource ustaw Datasource1.
W TDBgrid we właściwości Datasource ustaw też Datasource1.
W DataSet komponentu TDatasource właściwość Active ustaw na True;
Operacje na bazie znajdziesz na 4p, w google i innych źródłach, powodzenia.
P.S.
Odradzam takie bazy, bo są tragiczne, grzebiąc sie już z indexami człowieka szlag trafia.
Przejrzyj język SQL i artykuły, w których jest świetnie opisane zastosowanie tego języka w Delphi do tworzenia baz danych jednostanowiskowych jak i w sieci.
Hehe dzieki o to mi chodzilo choc jeszcze nie próbowalem ale cos z tego na pewno zrobie
:) jak nie w database desktop to w kodzi dzieki za link :) i info o database.</ort>
a najlepiej to olać BDE i paradoxa i przesiąść się na FireBirda - do nauki jak znalazł, zgodny w 99% ze standardem SQLa, nie sypią się indexy i nie ma ograniczeń paradoxa
Zgadzam się w 100% z Miśkiem.
Z mojej strony początkującym polecam obadanie języka SQL - jego składni, klauzul np. z fajnej stronki pt. http://www.w3schools.com/sql/default.asp
Gwarantuję, że podstawy szybko załapiecie :)
Zainstalujcie Interbase lub Firebird i tam sobie trenujcie zapytania - tworzenie tabel, operacje na rekordach.
Nabytą wiedzę przenieście potem do Delphi i piszcie swoją pierwszą bazę opartą na SQL :) Fajnie nie? Jak to super brzmi :)
Możecie się podeprzeć gotowymi podstawowymi zapytaniami napisanymi w Delphi na stronce www.austrinus.prv.pl :)
P.S.
Odrzućcie BDE, poznawajcie SQL, Firebird i Delphi, a będziecie MISTRZAMI :)