-
Forum: Multimedia
Delphi
by Tomislav,
3. Dez 2005
DANKE FÜR DIE HILFE
ICH HABE ES FERTIG
eine frage noch wie kann ich in einem edit feld nur GROßBUCHSTABEN zulassen?
-
Forum: Multimedia
Delphi
by Tomislav,
3. Dez 2005
Hier ist alles was ich hab!
-
Forum: Multimedia
Delphi
by Tomislav,
3. Dez 2005
procedure TForm1.Spieler1(Sender: TObject);
begin
if
(RBP1.Checked = true) and (lblString1.Caption = A) and (lblString2.Caption = B) and (lblString3.Caption = C) and (lblString4.Caption = D) and (lblString5.Caption = E) and (lblString6.Caption = F) and (lblString7.Caption = G) and (lblString8.Caption = H) and (lblString9.Caption = I) and (lblString10.Caption = J) and (lblString11.Caption =...
-
Forum: Multimedia
Delphi
by Tomislav,
3. Dez 2005
????
-
Forum: Multimedia
Delphi
by Tomislav,
2. Dez 2005
es ist nicht invisible
guckt es euch an
www.spvgg-hadamar-tt.de/Spiel.zip
-
Forum: Multimedia
Delphi
by Tomislav,
2. Dez 2005
procedure TForm1.PBP1OnPaint(Sender: TObject);
begin
if
(lblFehler1.Caption = '0')
then
begin
with PBP1.canvas do
begin
x.x := 5;
x.y := 65;
-
Forum: Multimedia
Delphi
by Tomislav,
2. Dez 2005
mit on paint geht es auch nicht richtig
da macht er zeichenfehler
-
Forum: Multimedia
Delphi
by Tomislav,
2. Dez 2005
Ich habe ein Problem mit der Paintbox:
sobald ich ein fenster oder ähnliches über die Paintbox schiebe ist sie weg.
sie ist auch dann weg wenn ich das fenster minimiere
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
procedure TForm1.btnWortwahlClick(Sender: TObject);
var Woerterliste: TStringlist;
var Wort, A, B, C, D, E, F, G, H, I, J, K, L: String;
begin
Woerterliste := TStringList.Create;
try
Woerterliste.LoadFromFile('Woerter.txt');
Wort := Woerterliste;
finally
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
jetzt habe ich halt das Problem wie ich es einstellen kann das immer abwechselt P1 und P2 dran ist
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
begin
Woerterliste := TStringList.Create;
try
Woerterliste.LoadFromFile('Woerter.txt');
Wort := Woerterliste;
finally
Woerterliste.Free;
Wort := 'A';
Wort := 'B';
Wort := 'C';
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
procedure TForm1.btnWortwahlClick(Sender: TObject);
var Woerterliste: TStringlist;
var Wort: String;
begin
Woerterliste := TStringList.Create;
Woerterliste.LoadFromFile('Woerter.txt');
Wort := Woerterliste;
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
rocedure TForm1.btnWortwahlClick(Sender: TObject);
var Woerterliste: TStringlist;
var Wort: array of string;
begin
Woerterliste := TStringList.Create;
Woerterliste.LoadFromFile('Woerter.txt');
radomize;
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
www.spvgg-hadamar-tt.de/Galgenmaennchen.exe
soo läuft es im mom!!^^
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
procedure TForm1.btnWortwahlClick(Sender: TObject);
begin
TStringList.LoadFromFile(Woerter.txt);
random();
AString := 'XYZ';
AString = X;
AString = Y;
AString = Z;
end;
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
ich bekomm die variablen ja nicht hin
und wie man das schreibt weiß ich auch nicht
in der hilfe find ich auch nichts passendes
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
procedure TForm1.btnWortwahlClick(Sender: TObject);
begin
end;
end.
hier möchte ich das:
- die Wörter aus Wörter.txt geladen werden
- das ein Wort ausgewählt wird
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
mit dem TStringList bekomme ich nicht hin
könnte mir jmd. ein beispiel zeigen??
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
ja das is klar
boah danke für die super tipps
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
egal
so was als nächstes ansteht^^
ich möchte gerne die wörter in eine txt datei
wie kann ich das wort daraus laden (geht das wie mit C++ mit zufall (random)?? und loadfromfile???)
und wie kann ich das Wort dann in einzelne Buchstaben zerlegen??
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
bei mir gehts auch
ich hatte visible auf false
hab aber auch auf button click halt visible true funktionierte trotzdem nicht hmm
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
echt? bei mir kommt garnichts hmm
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
ich mache aber doch nur diesen einen Klick und dann kommt nichts!!!
-
Forum: Multimedia
Delphi
by Tomislav,
1. Dez 2005
Erstmal eine Frage zu der Paintbox: Ich möchte den Galgen usw. in einer Paintbox zeichnen lassen. Beim Start des Spiels soll der Boden gezeichnet werden, warum zeichnet er ihn nicht wie ich vorgebe.
procedure Button.Click {ka halt}
var a, b: TPoint;
begin
PaintBox.Canvas.Rectangle (0,0,PaintBox.height,PaintBox.width);
with PaintBox do
begin
a.x := 1;
