Nach Hause
Top.Mail.Ru Yandeks.Metrika
Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

Nach unten

So erstellen Sie eine Leinwand in einem Fenster mit einem Fenster Finden Sie ähnliche Zweige


dimonf   (2001-12-16 17:23) [0]

Die Leute, wie man meine Daten erstellt, die ich auf die Leinwand stecke, verschwanden nicht mit Fensterscheinen.
Und wie kann ich einen Tastendruck ausführen, wenn ich Software-TPanel erstellt habe?

Typ
TPreview = Klasse (TPanel)
privat
Eigenschaft Canvas;
geschützt
Öffentlichkeit
Konstruktor Create (AOwner: TComponent); überschreiben;
end;

{TPreview}

Konstruktor TPreview.Create (AOwner: TComponent);
beginnen
Inherited Create (AOwner);
Parent: = AOwner als TWinControl;
BevelInner: = bvNone;
BevelOuter: = bvNone;
Farbe: = clWhite;
BorderStyle: = bsNone;
end;

Prozedur TForm1.FormPaint (Sender: TObject);
var R: TRect;
beginnen
mit MyPrev tun
beginnen
Canvas.Pen.Width: = 1;
Canvas.Brush.Style: = bsSolid;
Canvas.Font.Size: = 18;
R: = Rect (10,10,100,100);
Canvas. Rechteck (R.Left-1, R.Top-1, R.Right + 1, R.Bottom + 1);
Canvas.TextRect (R, 0,0, "Demos");
end;
end;

Prozedur TForm1.FormCreate (Sender: TObject);
var R: TRect;
beginnen
MyPrev: = TPreview.Create (Selbst);
MyPrev.Height: = Form1.Height * 2;
Panel1.Height: = Form1.Height * 2;
mit MyPrev tun
beginnen
Canvas.Pen.Width: = 1;
Canvas.Brush.Style: = bsSolid;
Canvas.Font.Size: = 18;
end;
end;

end;



dimonf   (2001-12-16 18:09) [1]

Leute, keine Gedanken ???



Seiten: 1 ganze Branche

Forum: "Haupt";
Aktuelles Archiv: 2002.01.08;
Herunterladen: [xml.tar.bz2];

nach oben





Speicher: 0.54 MB
Zeit: 0.021 c
1-22191
stalker_boss
2001-12-16 02:50
2002.01.08
Klingen


1-22209
Knochen
2001-12-14 14:10
2002.01.08
Hat jemand die PaintTo-Funktion verwendet, um WinControls auf einer Canvas-Bitmap zu zeichnen? Hilfe Ich kann nichts machen


14-22318
Frostbeulen
2001-10-31 17:11
2002.01.08
Rewind


14-22399
Mcsimm
2001-11-11 12:01
2002.01.08
Formatierung in den Antworten


14-22411
Madburro
2001-11-12 20:52
2002.01.08
WinXP-CD-Key





Afrikanisch Albanien Arabisch Armenisch Aserbaidschanisch Baskisch Weißrusse Bulgarisch katalanisch Chinesisch (vereinfacht) Chinesische Tradition) kroatisch Tschechisch Dänisch Niederländisch Englisch estnisch Philippinisch Finnisch Französisch
Galicisch Georgisch Deutsch Griechisch haitian Creole Hebräisch Hindi ungarisch isländisch Indonesian irisch Italian Japanisch Koreanisch lettisch litauisch Makedonisch Malay Maltesisch Norwegisch
persisch Polnisch Portugiesisch Rumänisch Russisch serbisch Slovakisch Slowenisch Spanisch Suaheli Schwedisch Thai Türkisch Ukrainisch Urdu Vietnamesisch Walisisch Jiddisch Bengalisch bosnisch
cebuano Esperanto Gujarati Hausa Hmong igbo Javanisch kannada Khmer Laotisch Lateinisch Maorisch Marathi Mongolisch nepali Pandschabi Somalisch Tamilisch Telugu Yoruba
Zulu
Английский Französisch Deutsch Italienisch Португальский Russisch Spanisch