Forum: Object-Pascal / Delphi-Language
by foerster7892,
14. Apr 2008
ich weiß nicht ob du mastermind kennst aber wenn ich den Button klicke habe ich nin einer Reihe 4 Images mit farben und dass 7 mal übereinander so dass jede Reihe andere farben hat das heißt nach dem siebten mal ist das erst zu ende und mann konnte jedesmal die Farben ändern
Forum: Object-Pascal / Delphi-Language
by foerster7892,
14. Apr 2008
danke hat funktioniert aber wie kann ich es machen das die schleife nacht jedem Button Klick nur einmal durchläuft und ich dann die Radiobox eingabe ändern kann?
var
Form1: TForm1;
x, y, z, w: integer;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
Forum: Object-Pascal / Delphi-Language
by foerster7892,
14. Apr 2008
sry geht aber leider auch nicht
'TBitmap' and 'TComponent' incompatible types
Forum: Object-Pascal / Delphi-Language
by foerster7892,
14. Apr 2008
var
Form1: TForm1;
x, y, z, w: integer;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
const Bilder: array of string = ('Blau','Rot','Grün','Gelb','Braun','Orange');
var i:integer;
Forum: Object-Pascal / Delphi-Language
by foerster7892,
13. Apr 2008
declaration expected but const found
und lacht mich nicht aus aber ich bin nun mal nen total noob
Forum: Object-Pascal / Delphi-Language
by foerster7892,
13. Apr 2008
var
Form1: TForm1;
array of string;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
const Bilder: array of string = ('Blau','Rot','Gruen','Gelb','Braun','Orange');
Forum: Object-Pascal / Delphi-Language
by foerster7892,
13. Apr 2008
x:=1
y:=2
Z:=3
w:=4
auch für image1 schreiben kann image(x+4*i)
i ist die schleife for i........
0 to 6
könnt ihr mir noch kurz sagen ob das geht?
Forum: Object-Pascal / Delphi-Language
by foerster7892,
13. Apr 2008
aslo das mit den farben versteh ich ja
cons (irgendwas mit konstanten arrays oder?)
Forum: Object-Pascal / Delphi-Language
by foerster7892,
13. Apr 2008
const Bilder: array of string = ('Blau','Rot','Gruen','Gelb','Braun','Orange');
vielen dank erstmal :lol:
aber könntest du mir bitte noch kurz die zeile oben erklären und wie ich die unter var definiere?
äh und auch danke für deinen Lösungsvorschlag aber ich weis noch nicht mal was nen case ist
ich will das erstmal so fertig kriegen und dann kann ich mir angucken was das ist
Forum: Object-Pascal / Delphi-Language
by foerster7892,
13. Apr 2008
Kommt wieder ne fehler meldung zu der Zeile
Konstant espression expected