asynchrone Dialoge

[Olli73]

So in etwa:

Delphi-Quellcode:

procedure TForm1.xyz;
begin
  if FirstStart then begin
    TDialogServiceAsync.InputQuery('Title', 'Prompt', 'Default',
      procedure(const ARes: TModalResult; const AVal: array of String)
      begin
        if ARes=mrOk then
          Login(AVal[0])
        else
          Abbruch;
      end);
  end else begin
    Login(ValueAusDb);
  end;
end;

[tbathelt]

Sieht schon gar nicht schlecht aus.
Es stört mich allerdings noch, dass z.B. bei mehreren verschiedenen Abfragen der Ablauf der Prozedur Login() in verschiedene einzelne Fragmente unterteilt werden muss, da man anders den Sprung aus der jeweiligen Callback Routine nicht an die richtige Stelle realisieren kann.
Trotzdem hilft mir der Vorschlag schon gut weiter. Vielen Dank dafür.

[Olli73]

Ich finde die bisherige Programmierung mit "echten" modalen (blockierenden) Dialogen auch schöner. Aber die mobilen Systeme sind halt zu blöd dafür.

[blawen]

Zitat von Olli73:

Ich finde die bisherige Programmierung mit "echten" modalen (blockierenden) Dialogen auch schöner. Aber die mobilen Systeme sind halt zu blöd dafür.

Funktioniert TDialogServiceSync in den Mobilen Umgebungen nicht?

[Olli73]

Zumindest bei Android geht das NICHT.

[TurboMagic]

Zitat von blawen:

Zitat von Olli73:

Ich finde die bisherige Programmierung mit "echten" modalen (blockierenden) Dialogen auch schöner. Aber die mobilen Systeme sind halt zu blöd dafür.

Funktioniert TDialogServiceSync in den Mobilen Umgebungen nicht?

Naja, man kann das sicher aufrufen und compilieren lassen, zur Laufzeit bekommt man aber eine Exception.
Schuld ist nicht Delphi, sondern mindestens Android. Die wollen koste es was es wolle einfach keine
modalen Dialoge!

Grüße
TurboMagic

[himitsu]

Zitat:

Delphi-Quellcode:

    xProc;
  end);

Diese Endlosschleife funktioniert wirklich gut.

[Olli73]

Zitat von himitsu:

Zitat:

Delphi-Quellcode:

    xProc;
  end);

Diese Endlosschleife funktioniert wirklich gut.

Er hat doch eine Abbruchbedingung drin, schön mit globaler Variable und goto ???