2 Farben auf einer Form mit weichen Übergängen

[Aurelius]

Hallo DP'ler

Kann man irgendiwe erreichen dass es in einem Formular 2 Farben mit weichen Übergängen gibt? Also dass z.b. die linke Seite Dunkel ist und sich die Farbe, je weiter man nach rechts kommt, ins helle wandelt?

[sirius]

ja

[Brainshock]

Suche im Forum nach "Gradient" oder schaue dir das mal an Form gradient fill.

[Aurelius]

Ok, hab was gefunden. Dankeschön

@ sirius: bist du Microsoft-Mitarbeiter?

Zitat:

Ein kleines amerikanisches Flugzeug hat sich im dichten Nebel verflogen.Der Pilot kreist um das oberste Stockwerk eines Bürohauses, lehnt sich aus dem Cockpit und brüllt durch ein offenes Fenster:"Wo sind wir?"
Ein Mann blickt von seinem PC auf: "In einem Flugzeug!"Der Pilot dreht eine scharfe Kurve und landet fünf Minuten später mit dem letzten Tropfen Treibstoff auf dem Flughafen von Seattle.Die verblüfften Passagiere wollen wissen, wie der Pilot es geschafft habe, sich zu orientieren."Ganz einfach", sagt der Pilot.
"Die Antwort auf meine Frage war kurz, korrekt und völlig nutzlos. Ich hatte also mit der Microsoft-Hotline gesprochen. Das Microsoft-Gebäude liegt 5 Meilen westlich vom Flughafen Seattle, Kurs 87 Grad."

Den konnt ich mir jetzt nicht verkneifen...

[Dunkel]

Zitat von xX0815Xx:

@ sirius: bist du Microsoft-Mitarbeiter?

{ ... }

Den konnt ich mir jetzt nicht verkneifen...

Moment! Du hast gefragt ob es geht, nicht wie es geht. Auf Deine Frage war die Antwort von sirius völlig ausreichend.
Fazit: lerne Fragen ordentlich zu stellen, dann bekommst Du auch ordentliche Antworten.

Das konnte ich mir jetzt nicht verkneifen...

[Aurelius]

In dem Zusammenhang hast du wohl recht, aber ich kann mit der Antwort nicht viel anfangen. War ja uch nur als kleiner Witz gedacht

Egal, lassen wir das

[sirius]

Fragen zu stellen ist auch nicht einfach.
Und mir fielen spontan einige Lösungsmöglichkeiten zu deiner Frage ein. Nur ich kenne den Zusammenhang in deinem Programm nicht, um dir dafür eine favorisierte Variante vorzustellen. Und alle aufzuschreiben und zu erklären,w ar mir zu viel

[Relicted]

OT:

Zitat von Dunkel:

Moment! Du hast gefragt ob es geht, nicht wie es geht. Auf Deine Frage war die Antwort von sirius völlig ausreichend.
Fazit: lerne Fragen ordentlich zu stellen, dann bekommst Du auch ordentliche Antworten.

Das konnte ich mir jetzt nicht verkneifen...

und auf "wiefragen" ist die beste antwort "gut!"

gruß
reli

[Aurelius]

So, ich hab nochmal eine Frage zum Thema. Ich würde gerne per Befehl zur LAufzeit diesen Übergang schaffen.

Delphi-Quellcode:

procedure TfrmMain.FormPaint(Sender: TObject);
begin
 DrawGradientH(Canvas, clGreen, clTeal, Rect(0, 0, Width, Height));
end;

procedure TfrmMain.chkbHorizontalClick(Sender: TObject); //horizontaler Übergang
begin
  if chkbHorizontal.Checked then
  begin
    chkbVertikal.Checked := FALSE;
    DrawGradientH(Canvas, clbColor1.Selected, clbColor2.Selected, Rect(0, 0, Width, Height));
  end;
end;

procedure TfrmMain.chkbVertikalClick(Sender: TObject); //vertikaler Übergang
begin
  if chkbVertikal.Checked then
  begin
    chkbHorizontal.Checked := FALSE;
    DrawGradientV(Canvas, clbColor1.Selected, clbColor2.Selected, Rect(0, 0, Width, Height))
  end;
end;

Ich nutze ein XPManifest, dh. die ganzen Felder wie eine Combobox werden auch nach diesem Design gefärbt. Wenn ich das Ganze jetzt aber zur Laufzeit per Checkboxen ändere wird die Form richtig gefärbt, aber alle anderen Felder wie die Combobox bleiben in der ursprünglichen Farbe.

Kann man das irgendwie ändern so dass alles richtig gefärbt wird?

[lbccaleb]

bei einigen komponenten kannst du ja transparenz einschalten, das sollte für dich reichen nur wenn ich das jetzt gerade richtig in erinnerung habe, kannst du das natürlich ausgerechnet bei checkboxen nicht, in dem fall würde mir im mom nichts anderes einfallen als nach einer entsprechenden komponente zu suchen, die transparenz unterstützt!!! ich glaube die checkbox auder der jedi vcl kann das...

mfg