Thema: Delphi Browser programmieren

Einzelnen Beitrag anzeigen

quendolineDD

Registriert seit: 19. Apr 2007
Ort: Dresden
781 Beiträge
 
Turbo Delphi für Win32
 
#12

Re: Browser programmieren

  Alt 19. Okt 2007, 17:43
Also ich kann dein Problem nicht ganz nachvollziehen. Du kannst doch alle Favouriten in einer Datei hinterlegen und aus dieser laden und schreiben.

Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Menus;

type
  TForm1 = class(TForm)
    MainMenu1: TMainMenu;
    Button1: TButton;
    moep1: TMenuItem;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
NewItem : TMenuItem;
begin
NewItem := TMenuItem.Create(MainMenu1); //Zuweisung des Parents und erstellen des MenuItems
NewItem.Caption := 'foobar'; //Name des MenuItems
NewItem.Tag := 1; //Glaube hier wird die Position des MenuItems zugewiesen
newItem.onClick := ClickMe; //damit wird die Prozedur ClickMe ausgeführt, wenn auf das Item geklickt wird
moep1.Add(newItem); //Hinzufügen zum Menupunkt "moep"
end;

end.
Klappt wunderbar, müsstest du nur noch auf deine Verhältnise einstellen

Und bitte : Editiere deine Einträge, solang diese nicht älter als 24 Tage sind.
Und dann noch was: Eigentlich bloß eine Frage pro Thread *g

Grüße aus Dresden

Edit1: Kommentare zum besseren Verständnis hinzugefügt

Edit2: Ich rate dir, alle Favouriten in einer Datei zu speichern.
Diese kannst du mit einer StringList laden und somit auch bearbeiten und wieder speichern.
StringList.LoadFromFile(filename); StringList.SaveToFile(filename);
Lars S.
Wer nicht mit der Zeit geht, geht mit der Zeit.
  Mit Zitat antworten Zitat