Hmm, volgens mij stond er niet zo heel veel in het artikel van DrBob. Als je een document helemaal vanaf niets wilt maken kun je dat bijvoorbeeld als volgt doen:
Code:
with XMLDocument do
begin
Active := True;
with AddChild('Persoon') do
begin
with AddChild('Naam') do
Text := 'Marcel';
with AddChild('Adres') do
Text := 'http://www.MarcelvanBeuzekom.nl';
end;
end;
Heb je ook al eens naar de mogelijkheid gekeken om interfaces te genereren vanuit een XML (of schema of DTD) bestand? Je code wordt dan een stuk leesbaarder omdat je op een standaard Delphi manier regels toevoegt. Een stukje uit mijn code:
Code:
Thread := Forum.Thread.Add;
Thread.ID := TrackerDataThreadID.AsInteger;
Thread.Title := TrackerDataThreadTitle.AsString;
Thread.Member.ID := TrackerDataThreadStarterID.AsInteger;
Thread.Member.Name := TrackerDataThreadStarterName.AsString;
Hier wordt een nieuwe Thread node aan een Forum node toegevoegd en die Thread node heeft weer een Member node. Kortom, de code is simpeler dan de uitleg. Zo'n interface maak je aan met de databinding wizard via File / New / Other / Data binding wizard.
Bookmarks