vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Allgemeine Diskussionen
Re: Problem beim drucken einer Grafik 
Autor: Andi W
Datum: 07.10.04 18:31
Danke für deine Mühe. Am Code ist eigentlich nichts kompliziertes dran. Es geht im Prinzip darum, sowas wie eine Stapelgrafik zu machen (ist keine, sieht aber in etwa so aus). Wobei jeder Stapelblock aus einer Picturebox besteht und aus einer Collection abgerufen wird. Die Position inY Richtung wird aus einer Funktion abgerufen (Hoehenkote) und die Blockhöhe entspricht der Höhe der Picturebox (und ist eine Eigenschaft der entsprechend Klasse des Blocks (SchichtX) 
For Each SchichtX In OberbauX.Oberbauschichten
        'Grafik
        MySubX = myX + OberbauX.GrafikX
        MySubY = myY + OberbauX.HoehenkoteGrafik(SchichtX.Index)
 
        Printer.PaintPicture frmmain.pctSchicht(SchichtX.Index), MySubX, MySubY
        Printer.Line (MySubX, MySubY)-(MySubX + _
                              frmmain.pctSchicht(SchichtX.Index).Width, MySubY _
                              + _
                              frmmain.pctSchicht(SchichtX.Index).Height + 10), _
                              , B
 
Next
Die +10 am Ende ist gewollt, da die untere Line des Blocks nicht dargestelt werden soll und sie somit aus der Grafik wandert. Wie gesagt es funktioniert ja - einmal. Ich muss im übrigen nicht nur das Programm (Debug) neu starten, sondern komplett VB, damit es wieder zum "einen mal" kommt. Lasse ich die Printer.Line Anweisung weg und zeichne nur die Picture, funktioniert es so oft ich will. Verwende ich in der Line Anweisung zusätzlich zum B dass F, wird der Block ordnungsgemäß ausgemalt (das will ich ja aber nicht). Und die Fillstyle-Eigentschaft ist definitiv 1 (also transparent). Ich bin ratlos.....
A.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Problem beim drucken einer Grafik749Andi W07.10.04 15:26
Re: Problem beim drucken einer Grafik576Master07.10.04 17:19
Re: Problem beim drucken einer Grafik545Andi W07.10.04 17:34
Re: Problem beim drucken einer Grafik614Master07.10.04 18:08
Re: Problem beim drucken einer Grafik514Andi W07.10.04 18:31
Re: Problem beim drucken einer Grafik630Master07.10.04 18:53
Re: Problem beim drucken einer Grafik553Andi W07.10.04 19:00
Re: Problem beim drucken einer Grafik554Master07.10.04 19:18
Re: Problem beim drucken einer Grafik560Andi W07.10.04 21:10
Re: Problem beim drucken einer Grafik552Andi W07.10.04 18:43

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel