Schön guten Tag,
viel eingearbeitet habe ich mich in Visual Basic jetzt noch nicht wirklich. Bin ehr vertrauter mit Pascal, aber auch dort würde ich an meine Grenze stößen mit dem selben Problem.
Meine Umschulungseinrichtung mag meine ehrgeizigkeit und sagt dauernd das ich sehr gut Programmieren kann, diese verweisen mich auf meine alten Delphi 6 Programme. Der Küchenleiter macht wöchentlich ein Essensplan als Excel Datei, was von der Sekräterin ständig mühsälig in ein anderes Format gebracht wird und fragte die IT-Kaufmann Abteilung ob wir kein Script hätten der das alles übersichtlich bringt, entwickeln können, zur Arbeitserleichterung. Ausbilder haben sich bereits daran per Excel-Formeln vergeblich versucht. Durch meine Begabtheit dachte man nun an mich und ich solle ein Programm vielleicht entwickeln. PDFSharp habe ich im Internet gefunden, das tolle ist, es erstellt direkt eine PDF Datei. Mit Delphi habe ich geringfügig mit CANVAS gearbeitet, aber auch nur geringfügig, somit wäre ich auch dort auf gleiches Problem gekommen.
Ich habe mir PDFSharp heruntergeladen.. Ich weiß nicht wie ich es richtig einbinde. Ich habe es wohl als 2. Projekt eingebunden. Ich muss nun immer den vollen Code angeben. Im Internet steht anderer Code. Bei mir sieht es in einem kurzem Testversuch beim Versuch mit der PDFSharp mich vertraut zu machen so aus..
Die Seite müsste ich noch auf quer stellen, die Option bin ich noch am suchen, hatte zur Zeit wegen anderen Unterrichtsfächern und Facharbeit(Dokumentation) und Prässentation (Vorübung für die IHK Prüfung, auch noch nicht ganz fertig) keine Zeit für das suchen der Option (Direction oder Scale) und ein wenig Freizeit möchte ich auch haben. Es gibt aber für Frühstück und Abendbrot auf einem Blatt 2 Spalten. Die Spallte sollte aber nicht über einen bestimmten x-Punkt hinaus gehen und dann umbrechen. Auch wäre eine Höhen-Berechnung des Textes schön, damit die Elemente auf korrekter höhe sind, sprich Motto valign="middle" align="center". In Excel wäre das wieder einfach Lösbar.
Meine Frage.. Welche Funktion sollte ich mir anschauen wegen Zeilenumbruch? Wie binde ich die PDFSharp richtig ein ohne PDFsharp.pdf davor zu machen..
Aus den Tipps und Tricks verschoben
-Artentus
viel eingearbeitet habe ich mich in Visual Basic jetzt noch nicht wirklich. Bin ehr vertrauter mit Pascal, aber auch dort würde ich an meine Grenze stößen mit dem selben Problem.
Meine Umschulungseinrichtung mag meine ehrgeizigkeit und sagt dauernd das ich sehr gut Programmieren kann, diese verweisen mich auf meine alten Delphi 6 Programme. Der Küchenleiter macht wöchentlich ein Essensplan als Excel Datei, was von der Sekräterin ständig mühsälig in ein anderes Format gebracht wird und fragte die IT-Kaufmann Abteilung ob wir kein Script hätten der das alles übersichtlich bringt, entwickeln können, zur Arbeitserleichterung. Ausbilder haben sich bereits daran per Excel-Formeln vergeblich versucht. Durch meine Begabtheit dachte man nun an mich und ich solle ein Programm vielleicht entwickeln. PDFSharp habe ich im Internet gefunden, das tolle ist, es erstellt direkt eine PDF Datei. Mit Delphi habe ich geringfügig mit CANVAS gearbeitet, aber auch nur geringfügig, somit wäre ich auch dort auf gleiches Problem gekommen.
Ich habe mir PDFSharp heruntergeladen.. Ich weiß nicht wie ich es richtig einbinde. Ich habe es wohl als 2. Projekt eingebunden. Ich muss nun immer den vollen Code angeben. Im Internet steht anderer Code. Bei mir sieht es in einem kurzem Testversuch beim Versuch mit der PDFSharp mich vertraut zu machen so aus..
VB.NET-Quellcode
- Dim document As PdfSharp.Pdf.PdfDocument = New PdfSharp.Pdf.PdfDocument
- document.Info.Title = "Speisepaln von xx.xx.xxxx bis yy.yy.yyyy"
- Dim XBrushes As PdfSharp.Drawing.XBrushes
- Dim page As PdfSharp.Pdf.PdfPage = document.AddPage
- Dim gfx As PdfSharp.Drawing.XGraphics = PdfSharp.Drawing.XGraphics.FromPdfPage(page)
- Dim textfont As PdfSharp.Drawing.XFont = New PdfSharp.Drawing.XFont("Verdana", 14)
- Dim text_head As PdfSharp.Drawing.XFont = New PdfSharp.Drawing.XFont("Verdana", 16, PdfSharp.Drawing.XFontStyle.Bold)
- gfx.DrawString("Speiseplan", text_head, Brushes.Black, 75, 68)
- gfx.DrawLines(Pens.Black, 75, 80, 200, 80)
- gfx.DrawString(TextBox1.Text, textfont, Brushes.Black, 75, 100)
- Dim filename As String = "HelloWorld.pdf"
- document.Save(filename)
- Process.Start(filename)
Die Seite müsste ich noch auf quer stellen, die Option bin ich noch am suchen, hatte zur Zeit wegen anderen Unterrichtsfächern und Facharbeit(Dokumentation) und Prässentation (Vorübung für die IHK Prüfung, auch noch nicht ganz fertig) keine Zeit für das suchen der Option (Direction oder Scale) und ein wenig Freizeit möchte ich auch haben. Es gibt aber für Frühstück und Abendbrot auf einem Blatt 2 Spalten. Die Spallte sollte aber nicht über einen bestimmten x-Punkt hinaus gehen und dann umbrechen. Auch wäre eine Höhen-Berechnung des Textes schön, damit die Elemente auf korrekter höhe sind, sprich Motto valign="middle" align="center". In Excel wäre das wieder einfach Lösbar.
Meine Frage.. Welche Funktion sollte ich mir anschauen wegen Zeilenumbruch? Wie binde ich die PDFSharp richtig ein ohne PDFsharp.pdf davor zu machen..
Aus den Tipps und Tricks verschoben
-Artentus
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „dlosse“ ()