AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

TImage ändern

Ein Thema von f4k3 · begonnen am 13. Sep 2007 · letzter Beitrag vom 13. Sep 2007
Antwort Antwort
Benutzerbild von f4k3
f4k3

Registriert seit: 15. Aug 2007
Ort: Nürnberg
313 Beiträge
 
Delphi 2007 Architect
 
#1

TImage ändern

  Alt 13. Sep 2007, 10:44
Seid gegrüßt liebe DP'ler

Erstmal paar Fakten:

1x Radiogroup
1x Image (hat aber ne Buttonfunktion)
1x DBGrid

Ich wähle in meiner Radiogroup eine Liste (Datenbank) aus, und klicke dann aufs Image ... wenn das Image angeklickt wird, soll das DBGrid auf Visible := True; gesetzt werden und die Datasource je nach ItemIndex meiner Radiogroup, auf eine Datasource zeigen.
Das funktioniert auch h3h3

aber mein prob is, ich will sobald ich auf das Picture (Beschriftung 'Anzeigen') das Image gewechselt wird und ein anderes Picture (Beschriftung 'Ausblenden') angezeigt wird.

Wenn ich wiederum auf das Image klicke soll das Picture (Beschriftung 'Anzeigen') wieder geladen werden.

Ich hoffe ich verwirre euch nicht

Also war meine Idee das Pitcutre beim Buttonklick zu wechseln, eine Var anzulegen "iCount : Integer" und wenn der Counter > 0 ist soll das Image wieder gewechselt werden nur läufts noch nich so rund ... da ich nich weiß wie ich einen erneuten Buttonklick registrieren kann ... hier sieht mal mein Haxxor Code aus

Delphi-Quellcode:

procedure TfPostbuchToolsListen.iAnzeigenClick(Sender: TObject);
var i : Integer;
begin

        i := 0;

        iAnzeigen.Picture.LoadFromFile('O:\POSTAUSGANGSBUCH VERSION 1.00 (Remake)\Grafiken\JPG-Files\Buttons\Ausblenden.jpg');

        case rgListen.ItemIndex of

          0: dbgListen.DataSource := SKunde;
          1: dbgListen.DataSource := SPost;
          2: dbgListen.DataSource := SBenutzer;

        end;

        // Bevor das i := 1 gesetzt wird, muss der Buttonklick registriert werden ... glaub ich zumindest ^^

        i := 1;

        if i > 0 then
        begin

          iAnzeigen.Picture.LoadFromFile ('O:\POSTAUSGANGSBUCH VERSION 1.00 (Remake)\Grafiken\JPG-Files\Buttons\Anzeigen.jpg');

        end;
end;
Das ganze sieht so aus

//edit: Bild-URL eingefügt
Sascha
  Mit Zitat antworten Zitat
s-off
(Gast)

n/a Beiträge
 
#2

Re: TImage ändern

  Alt 13. Sep 2007, 10:56
Zitat von f4k3:
Ich hoffe ich verwirre euch nicht
Zitat von f4k3:
aber mein prob is, ich will sobald ich auf das Picture (Beschriftung 'Anzeigen') das Image gewechselt wird und ein anderes Picture (Beschriftung 'Ausblenden') angezeigt wird.
Naja, hättest Du Deinen Beitrag vor dem Abschicken nochmal gelesen, hätte ich diesen Satz nicht drei mal lesen müssen, um ihn zu verstehen

Also, ich gehe davon aus, dass das, was Du möchtest, eine Art Schalter darstellt.
Lege Dir bspw. im Private-Teil Deiner Klasse eine boolsche Variable 'bPressed' (oder so ähnlich) an, welche als Schalter dient.
In Deiner Bild-Drück-Routine überprüfst Du dann bPressed und reagierst entsprechend - am Ende dann noch
bPressed := not bPressed aufrufen, um Deinen Schalter umzulegen.
  Mit Zitat antworten Zitat
Benutzerbild von f4k3
f4k3

Registriert seit: 15. Aug 2007
Ort: Nürnberg
313 Beiträge
 
Delphi 2007 Architect
 
#3

Re: TImage ändern

  Alt 13. Sep 2007, 12:18
hups Deutsche Sprache, schwere Sprache xD

Ähm ... joah könnte klappen, was mir aber grad noch so einfällt ...

Wenn ich ne andere Liste ansehen möchte ... Dann würd ich jedesmal die Liste erst wieder schließen und dann die andere liste wieder öffnen ... is irgendwie doof ...

Variante No. 1:

Ich erstell nen Btn der am Anfang unsichtbar ist, sichtbar wird wenn ich den "Anzeigen"-Btn drücke. Dann könnt ich wann ich will das Das Grid, und den "Ausblenden"-Btn wieder unsichtbar machen.

Variante No. 2:

Ich machs so wie dus gesagt hast ... und wechsel mein Grid, sobald ich 1x den "Anzeigen"-Btn gedrückt habe, nach Item.Index meiner Radiogroup, ohne jedesmal immer wieder auf anzeigen zu klicken ... (sofern möglich, ich != Delpi xD) ... und beim 2. Klick auf den Button das Grid wieder ausblenden.

Wobei ich denk dass die Variante No. 2 professioneller rüberkommt ... oder was meinst du/ihr?

Mfg F4k3
Sascha
  Mit Zitat antworten Zitat
13. Sep 2007, 14:19
Dieses Thema wurde von "MrSpock" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Delphi Frage.
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:27 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz