Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thorben_Ko,
8. Nov 2007
Ich bin jedes Element durch gegangen und hab auf die Werte geprüft
for x1 := 0 to fColCount - 1 do
begin
for y1 := 0 to fRowCount - 1 do
begin
if (Y > fItems.Top) and (Y < fItems.Height + fItems.Top) and
(x > fItems.Left) and (X < fItems.Left + fItems.Width) then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thorben_Ko,
8. Nov 2007
Dank deines Ansatzes hab ich es hin bekommen
danke dir
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thorben_Ko,
7. Nov 2007
Super vielen dank, so geht es
Aber leider folgt schon das nächste....
Bis jetzt konnte problemlos ermitteln welches Feld im OnMouseDown geclickt wurde. DA aber nun alle Felder "unterschiedliche" grössen haben, geht das leider nicht mehr so einfach...
Hast dazu auch ne Idee?
Danke schon mal falls noch was kommt, aber vorallem danke für deinen wirklich guten tipp
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thorben_Ko,
7. Nov 2007
Hallo,
ich habe ein mehrer Objekte geschrieben die einfac hgesagt folgendes machen:
TField zeichnet einfach ein Rechteck auf ein TCanvas
TFarbFeld wurde von PaintBox vererbt und auf dem Canvas werden die Rechtecke gezeichnet.
Die grösse der einzelnen Rechtecke ist abhängig von der grösse der Painbox.