Periodensystem Xtreme 1.0 beta 6

[turboPASCAL]

Zitat von jaenicke:

Genau aus dem Grund habe ich als minimal unterstützte Version Delphi 7 geschrieben. Ich hatte nicht ernsthaft damit gerechnet, dass eine Unterstützung von Delphi 6 heute noch von Interesse sein könnte.

Aber sicher das.

Zitat von jaenicke:

Bist du masochistisch veranlagt, dass du noch D6 PE benutzt?

Ja Nö, das ist nur die beste Delphiversion... klein leicht und flink...

Zitat:

Ich wollte mir das irgendwann einmal anschauen. Meine Vermutung ist wie auch unter Windows 9x, dass es an der Animation beim Ein- und Ausblenden liegt. Ich werde das einmal überprüfen.

Tja, in der Tat daran lag es, verstehen tuh ich's aber nicht (nix Win9x, Vista).

Zitat:

Trotzdem fehlt ein wichtiges Feature, das du selbst nachbauen müsstest ...

Folgende Zeilen musste ich noch einbauen damit es nicht zu einem Fehler bei der Bereichsüberprüfung kommt:

Delphi-Quellcode:

function TPerodicTable.HitTest(ALeft, ATop: Integer): Byte;
var
  X, Y: Integer;
  ElemWidth, ElemHeight: Single;
begin
  //...
  else
    Y := Trunc((ATop + ElemHeight / 2) / ElemHeight);

  {$MESSAGE '*** 1 ***'}
    if y > 9 then y := 9;
    if x > 18 then x := 18;
    Result := ElementAtPos[Y, X];
  //

  if (Result > 0) ...
end;

Was noch ein nettes Feature bei der Suche wäre, die nicht gesuchten Elemente auszugrauen (oder einfach nicht die Hintergrundfarbe zu nutzen).