Avatar billede hestetoften Nybegynder
30. november 2004 - 20:04 Der er 4 kommentarer og
2 løsninger

Hvad er smartest ?

Jeg er ved at lave et lille pgr der skal gemme nogle strings

hver "post" skal indeholde 3 strings á max 30 karakterer.

Hvad er smartest: Database, registreringsdatabasen eller en ini fil.

Der vil være max 100 poster !
Avatar billede pellelil Nybegynder
30. november 2004 - 20:13 #1
I teorien kan det egentlig være lige meget, men hvis du vil forsøge at "skjule" dine data for brugeren så vil jeg foreslå Reg-DB, og hvis du på den anden side ønsker at gøre det nemt for brugeren at (evt.) flytte disse data nemt fra en maskine til en anden så kunne Ini-filen være at foretrække !?
Avatar billede delphi Nybegynder
01. december 2004 - 00:38 #2
Med det lille databehov (~9 kBytes) vil jeg anbefale at du benytter et TClientDataSet.  Denne component har fordelen af at være en regulær tabel struktur og har derfor metoder til navigering og søgning.  Desuden har den en rigtig fed feature, idet den kan gemme/loade fra en XML-fil.  Når man gemer et TClintdataSet i en XML fil, så oprettes automatisk META data i filen, hvilket går det utroligt nemt at gå til filen på et senere tidspunkt (det er også derfor TClientSet kan loade datene igen). 

Jeg anbefaler, at du kigger på demoen i:
  C:\Program Files\Borland\Delphi7\Demos\DbClx\mybasexplorer
Avatar billede hestetoften Nybegynder
01. december 2004 - 06:43 #3
Desværre sidder jeg med D4
Avatar billede delphi Nybegynder
01. december 2004 - 18:23 #4
Se, det havde jo været en nyttig info at komme ud med.....
Avatar billede tolderlund Nybegynder
02. december 2004 - 10:27 #5
Hvis der kun er et spørgsmål om at gemme strings på disken og hente dem ind senere, så er det simplste nok at bruge en TStringList:

procedure TForm1.Button1Click(Sender: TObject);
var
  sl: TStringList;
begin
  sl := TStringList.Create;
  try
    sl.Add('a1');
    sl.Add('a2');
    sl.Add('a3');
    {osv.}
    sl.SaveToFile('c:\strings.txt');
  finally
    sl.Free;
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  sl: TStringList;
  i: Integer;
  s: string;
begin
  sl := TStringList.Create;
  try
    sl.LoadFromFile('c:\strings.txt');
    for i := 0 to sl.Count - 1 do
    begin
      s := sl[i];
      {gør noget med s}
    end;
  finally
    sl.Free;
  end;
end;
Avatar billede hestetoften Nybegynder
07. december 2004 - 21:26 #6
tak
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