AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

BufferedReader in Firemonkey?

Ein Thema von blackdrake · begonnen am 10. Dez 2014 · letzter Beitrag vom 11. Dez 2014
Antwort Antwort
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.869 Beiträge
 
Delphi 11 Alexandria
 
#1

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 15:05
Nicht

Delphi-Quellcode:
var
  x: TJBufferedReader;
?
Markus Kinzler
  Mit Zitat antworten Zitat
blackdrake

Registriert seit: 22. Aug 2003
Ort: Bammental
618 Beiträge
 
Delphi 10.3 Rio
 
#2

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 15:08
Hallo,

wenn ich das verwende, kommt bei folgender Zeile ein Kompilierfehler:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  x: TJBufferedReader;
begin
  x := TJBufferedReader.Create; // [DCC Error] Unit1.pas(50): E2010 Incompatible types: 'TJBufferedReader' and 'JBufferedReader'
end;
Daniel Marschall
  Mit Zitat antworten Zitat
blackdrake

Registriert seit: 22. Aug 2003
Ort: Bammental
618 Beiträge
 
Delphi 10.3 Rio
 
#3

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 15:21
Ich denke mir, dass es auch damit zusammenhängen könnte, dass der Konstruktor von BufferedReader ja Argumente erfordert

Der Konstruktor müsste also wahrlichlich so aussehen:

constructor Create(Ain: JReader); ... allerdings kann ein Interface keinen Konstruktor haben ...
Daniel Marschall
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#4

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 15:54
Also bei mir geht sowas immer so
Delphi-Quellcode:
function GetConnectivityManager: JConnectivityManager;
var
  ConnectivityServiceNative: JObject;
begin
  ConnectivityServiceNative := SharedActivityContext.getSystemService( TJContext.JavaClass.CONNECTIVITY_SERVICE );

  if not Assigned( ConnectivityServiceNative )
  then
    raise Exception.Create( 'Could not locate Connectivity Service' );

  Result := TJConnectivityManager.Wrap( ( ConnectivityServiceNative as ILocalObject ).GetObjectID );

  if not Assigned( Result )
  then
    raise Exception.Create( 'Could not access Connectivity Manager' );
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.869 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 16:10
Ich habe den JNI Wrapper mal mit Java2Op erzeugen lassen. Die Konstruktoren sind als init-Methoden implementiert.

Delphi-Quellcode:
{*******************************************************}
{                                                       }
{           CodeGear Delphi Runtime Library             }
{ Copyright(c) 2014 Embarcadero Technologies, Inc.      }
{                                                       }
{*******************************************************}

unit Androidapi.JNI.java.io.BufferedReader;

interface

uses
  Androidapi.JNIBridge,
  Androidapi.JNI.JavaTypes;

type
// ===== Forward declarations =====

  JBufferedReader = interface;//java.io.BufferedReader

// ===== Interface declarations =====

  JBufferedReaderClass = interface(JReaderClass)
    ['{ED860F80-BCB7-4BC0-977F-95DE9CACE248}']
    {class} function init(in_: JReader): JBufferedReader; cdecl; overload;
    {class} function init(in_: JReader; size: Integer): JBufferedReader; cdecl; overload;
  end;

  [JavaSignature('java/io/BufferedReader')]
  JBufferedReader = interface(JReader)
    ['{81A25906-BC48-4F21-B1D4-5FDA81218C63}']
    procedure close; cdecl;
    procedure mark(markLimit: Integer); cdecl;
    function markSupported: Boolean; cdecl;
    function read: Integer; cdecl; overload;
    function read(buffer: TJavaArray<Char>; offset: Integer; length: Integer): Integer; cdecl; overload;
    function readLine: JString; cdecl;
    function ready: Boolean; cdecl;
    procedure reset; cdecl;
    function skip(charCount: Int64): Int64; cdecl;
  end;
  TJBufferedReader = class(TJavaGenericImport<JBufferedReaderClass, JBufferedReader>) end;

implementation

procedure RegisterTypes;
begin
  TRegTypes.RegisterType('Androidapi.JNI.Interfaces.JBufferedReader', TypeInfo(Androidapi.JNI.Interfaces.JBufferedReader));
end;

initialization
  RegisterTypes;
end.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.152 Beiträge
 
Delphi 10.3 Rio
 
#6

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 16:29
OK und jetzt nochmal zum mitschreiben bitte...

Wofür das ganze "geraffel" mit Java?

In der Zeit wo Du das gegoogled hast hättest Du das 3x schon in Delphi programmiert...

Versteh ich nicht...

Mavarik
  Mit Zitat antworten Zitat
mjustin

Registriert seit: 14. Apr 2008
3.008 Beiträge
 
Delphi 2009 Professional
 
#7

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 16:37
Wofür das ganze "geraffel" mit Java?
In der Zeit wo Du das gegoogled hast hättest Du das 3x schon in Delphi programmiert...
Die verlinkte Frage besagt ja, dass ein JInputStream (wo der jetzt her kommt ist wird nicht erläutert) über einen BufferedReader gelesen werden soll. Keiner mir bekannten Delphi Stream-Funktion kann man einen JInputStream als (z.B. Konstruktor-) Argument übergeben...
Michael Justin
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.152 Beiträge
 
Delphi 10.3 Rio
 
#8

AW: BufferedReader in Firemonkey?

  Alt 10. Dez 2014, 17:29
über einen BufferedReader gelesen werden soll.
Von "gelesen werden soll" war keine Rede, sondern

die Java-Klasse "BufferedReader" und "InputStreamReader" verwenden möchte, um einen InputStream blockierungsfrei Zeile für Zeile lesen zu können.
Hierbei geht es für mich in erster Linie um die Funktionalität eines blockungsfreien Lesens...
Daher meine Antwort schreib es doch schnell in Delphi!

Mavarik
  Mit Zitat antworten Zitat
Antwort Antwort

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:51 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz