Avatar billede kokoko Nybegynder
18. december 1999 - 14:33 Der er 1 kommentar og
1 løsning

DATABASE

Jeg har to små spørgsmål:

1) Når man bruger BDE til en MS Access database er det så muligt at slippe for at skulle trykke op hver gang man starter sin application (den spørger om brugernavn og password)?

2) Jeg vil gerne have et eksempel på hvordan man insætter en ny linje og putter informationer i den. via TTabel når man bruger en MS Access database!

Håber i kan hjælpe mig!

Kokoko
Avatar billede delphi Nybegynder
19. december 1999 - 13:38 #1
Jeg har to små spørgsmål:

1) Når man bruger BDE til en MS Access database er det så muligt at slippe for at skulle trykke op hver gang man starter sin application (den spørger om brugernavn og password)?

Brug en TDataBase component på dit DataModule.
Hook dets properties op, således at:
- 'AliasName' peger på dit Access Alias.
- 'DatabaseName' udfyldes med et passende navn, fx. 'Local'
- 'LoginPrompt' sættes til False.

I alle de tabeller, der skal connectes til denne database, sætter du 'DatabaseName' propertyen til 'Local' (Eller hvad du nu kaldte dit locale "alias" i TDatabase componenten.

2) Jeg vil gerne have et eksempel på hvordan man insætter en ny linje og putter informationer i den. via TTabel når man bruger en MS Access database!

På samme måde som med en Paradox tabel - der er ingen forskel på brugen af en Paradox eller Access tabel hvad dette angår.
Jeg har fx. en Access database, hvori der er en tabel kaldet 'Player'. Denne tabel indeholder bl.a. felterne 'PlayerNo', 'PlayerName' og 'Adresse'.

Hvis jeg ville lave en lille rutine, der indsætter en post i denne tabel, så kunne det fx. gøres således:

procedure TForm1.Button1Click(Sender: TObject);
begin
  // Opret ny record/post og sæt tabel i insert mode.
  Table1.Append;

  // Indsæt de forskellige felters værdier i den nye post
  Table1.FieldByName('PlayerNo').AsInteger := 100;
  Table1.FieldByName('PlayerName').AsString := 'Anders And';
  Table1.FieldByName('Adresse').AsString := 'Paradisæblevej 13';

  // Alslut den nye post og gør ændringerne permanente.
  Table1.Post;
end;

Normalt vil jeg dog benytte din tabellers Field editor (højre- eller dobbeltclick på din Ttable) for på den måde at oprette fields.
I ovenstående tilfælde ville linien:

  Table1.FieldByName('PlayerName').AsString := 'Anders And';

således kunne erstattes med:

  Table1PlayerName.AsString := 'Klaus Kludder';

NiP
Avatar billede kokoko Nybegynder
19. december 1999 - 14:42 #2
Ok dine point er mere end fuldt fortjent..
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester