Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.176 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Funktionsverwaltung

  Alt 20. Sep 2007, 09:43
Ok, jetzt wird gespeichert...
Man muss also nach der Sourceeingabe im Editmodus in den "Datenbankmodus" wechseln und dann auf "Neuer Eintrag" gehen und dann den schon vorhandenen Namen nochmal eingeben...
Das ist gewöhnungsbedürftig bzw. sollte irgendwo erklärt werden.
Für eine Sortierung des TreeView findet sich hier im Forum einiges.
Z.B.:
Delphi-Quellcode:
function CustomSortProc(Node1, Node2: TTreeNode; Data: Integer): Integer; stdcall;
// für das Sortieren von TreeViews, als Parameter an Customsort übergeben:
// Aufruf: TreeView1.CustomSort(@CustomSortProc, 0);
// Data: 0 = Absteigend, 1 = Aufsteigend
begin
  if Data = 0 then
    Result := AnsiStrIComp(Pchar(Node1.Text), PChar(Node2.Text))
  else
    Result := -AnsiStrIComp(PChar(Node1.Text), PChar(Node2.Text));
end;
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
  Mit Zitat antworten Zitat