MobileApps @ Apple App Store

[Phoenix]

Zitat von arnof:

Zitat von Mavarik:

emm.... Mit PDF geht, meinte ich ein PDF zu erzeugen, nicht das "Umblättern" usw..
Mavarik

Preisfrage: wie erzeugst Du eine PDF mit Bordmitteln ?

http://developer.apple.com/library/i...ratingPDF.html

[Mavarik]

Zitat von Phoenix:

http://developer.apple.com/library/i...ratingPDF.html

OK! Du warst zwar schneller, aber ich habe ein Delphi Beispiel

Delphi-Quellcode:

procedure TForm6.Button1Click(Sender: TObject);
var
  pdfContext   : CGConTextRef;
  Path         : CFStringRef;
  URL          : CFURLRef;
  myDictionary : CFMutableDictionaryRef;
  PageRect     : CGRect;
  Filename,
  Title,
  Creator      : String;
  DPI          : Integer;
begin
  DPI := 72;
  PageRect.origin.x := 0;
  PageRect.origin.y := 0;
  PageRect.size.width := 8*DPI;
  PageRect.size.height := 11*DPI;


  Filename := GetHomePath + PathDelim + 'Documents' + PathDelim+'MyPDF.PDF';
  path := CFStringCreateWithCString (NIL,  MarshaledAString(utf8Encode(Filename)),kCFStringEncodingUTF8);
  url  := CFURLCreateWithFileSystemPath (Nil, path, kCFURLPOSIXPathStyle, false);
  CFRelease(path);

  // This dictionary contains extra options mostly for 'signing' the PDF
  myDictionary := CFDictionaryCreateMutable(NIL, 0,NIL,NIL);
//                                             @kCFTypeDictionaryKeyCallBacks,
//                                             @kCFTypeDictionaryValueCallBacks);
  Title   := 'kCGPDFContextTitle';
  Creator := 'kCGPDFContextCreator';
  CFDictionarySetValue(myDictionary, @Title, CFSTR('My PDF File'));
  CFDictionarySetValue(myDictionary, @Creator, CFSTR('Mavarik'));

  // Create our PDF Context with the CFURL, the CGRect we provide, and the above defined dictionary
  pdfContext := CGPDFContextCreateWithURL(url, @pageRect, CFDictionaryRef(myDictionary));
  CFRelease(url);

  // Done creating our PDF Context, now it's time to draw to it
  // Starts our first page
  CGContextBeginPage (pdfContext, @pageRect);

    // Draws a black rectangle around the page inset by 50 on all sides
  CGContextStrokeRect(pdfContext, CGRectMake(50, 50, pageRect.size.width - 100, pageRect.size.height - 100));

  CGContextSelectFont (pdfContext, 'Helvetica', 16, kCGEncodingMacRoman);
  CGContextSetTextDrawingMode (pdfContext, kCGTextFill);
  CGContextSetRGBFillColor (pdfContext, 0, 0, 0, 1);
  CGContextShowTextAtPoint (pdfContext, 100, 100, 'Hallo World PDF1', strlen('Hallo World PD1'));
  CGContextShowTextAtPoint (pdfContext, 100, 200, 'Hallo World PDF2', strlen('Hallo World PD2'));
  CGContextShowTextAtPoint (pdfContext, 200, 300, 'Hallo World PDF3', strlen('Hallo World PD3'));
  CGContextEndPage (pdfContext);

  // We are done with our context now, so we release it
  CGContextRelease (pdfContext);
  CFRelease(MyDictionary);

    {
    // This code block will create an image that we then draw to the page
    const char *picture = "Picture";
    CGImageRef image;
    CGDataProviderRef provider;
    CFStringRef picturePath;
    CFURLRef pictureURL;

    picturePath = CFStringCreateWithCString (NULL, picture,
                                             kCFStringEncodingUTF8);
    pictureURL = CFBundleCopyResourceURL(CFBundleGetMainBundle(), picturePath, CFSTR("png"), NULL);
    CFRelease(picturePath);
    provider = CGDataProviderCreateWithURL (pictureURL);
    CFRelease (pictureURL);
    image = CGImageCreateWithPNGDataProvider (provider, NULL, true, kCGRenderingIntentDefault);
    CGDataProviderRelease (provider);
    CGContextDrawImage (pdfContext, CGRectMake(200, 200, 207, 385),image);
    CGImageRelease (image);
    // End image code

    // Adding some text on top of the image we just added
    CGContextSelectFont (pdfContext, "Helvetica", 16, kCGEncodingMacRoman);
    CGContextSetTextDrawingMode (pdfContext, kCGTextFill);
    CGContextSetRGBFillColor (pdfContext, 0, 0, 0, 1);
    const char *text = "Hello World!";
    CGContextShowTextAtPoint (pdfContext, 260, 390, text, strlen(text));
    // End text
    }
    // We are done drawing to this page, let's end it
    // We could add as many pages as we wanted using CGContextBeginPage/CGContextEndPage

    Webbrowser1.Navigate('file://'+GetHomePath + PathDelim + 'Documents' + PathDelim+'MyPDF.PDF');
end;

Grüsse Mavarik

[Union]

Und das geht auf iOS? Sieht nach OSX aus...

[Phoenix]

Die API listet Apple als

Zitat:

Drawing and Printing Guide for iOS

.

[Mavarik]

Zitat von Union:

Und das geht auf iOS? Sieht nach OSX aus...

Ja funktioniert...

[Union]

Zitat von Mavarik:

Zitat von Union:

Und das geht auf iOS? Sieht nach OSX aus...

Ja funktioniert...

Ich war nur mal wieder verwirrt wegen der lustigen Namespaces die verwendet wurden. In diesem Fall steckt das ja in iOS.CoreGraphics aber auch Macapi.CoreFoundation.

[arnof]

@ Mavarik: mal Danke; aber unter Bordmitteln verstehe ich eine eigene Komponente oder Delphieigene Funktion; mit Zugriff auf die API's kann man ja alles selbst machen .... die PDF's will man z.B. auch in der Delphiversion für den grünen Roboter haben ..... da muss man das alles doppelt Programmieren ....

Zu den Appstore:

Heute Nacht hatte ich es am Magen, wie immer weiss der mehr; also mal in die Mails geschaut und der Magen hatte wie immer recht: Review ist nun gestartet und nach 20 min wieder abgebrochen! Was die genau wollen ist mir Rätselhaft; Ich solle Barcodeurls hochladen + Sie benötigen vollen Zugriff und ich soll einen Demoaccount anlegen nun lasse ich es morgen nochmals mit klaren Kopf übersetzen was die genau wollen....

[Union]

Naja, die wollen testen. Bei einer "normalen" App wird ja alles durch Controls vom Benutzer ausgelöst oder DB-, WEB- und Timerbafragen. Das kann man direkt testen. Jetzt wollen sie eine URL wo sie Barcodes finden um zu testen was passiert wenn man die scannt.

[Mavarik]

Zitat von arnof:

@ Mavarik: mal Danke; aber unter Bordmitteln verstehe ich eine eigene Komponente oder Delphieigene Funktion; mit Zugriff auf die API's kann man ja alles selbst machen .... die PDF's will man z.B. auch in der Delphiversion für den grünen Roboter haben ..... da muss man das alles doppelt Programmieren ....

OK wenn Du es so siehst... Zu Android kann ich "noch" nix sagen im Bezug auf PDF's, aber

Bordmitteln heißt für mich ich muss keine Komponente kaufen, den iOS kann das schon selber... Ist mehr als was Windows kann.

Klar wäre es schön, z.B. SynPDF für FMX zu haben... Nach 2h Konvertierung habe ich aufgegeben.

Man könnte auch einen Webservice nutzen, aber dann kannst Du nur PDF's erzeuge, wenn Du eine Online-Verbindung hast. auch nicht so schön.

Mavarik