Inputbox

[ichbins]

Zitat von ManuMF:

[OT]Wenn QDialogs nicht bei den PEs dabei ist, wie kommt die Unit dann in die Hilfe?[/OT]

frag borland, ich wars nicht, ehrlich! Da steht ja auch dabei: "wenn sie nur eine PE besitzten, haben sie keine Q-Units" (oder irgendwie so). Einfach eine Hilfe für alle versionen.

[Khabarakh]

Zitat von ManuMF:

[OT]Wenn QDialogs nicht bei den PEs dabei ist, wie kommt die Unit dann in die Hilfe? Bei mir steht sie nicht drin.[/OT]

Ich habe zwar keine D7-PE (besser gesagt gar kein D7), aber ich denke, dass die gesamte CLX in der PE nicht enthalten ist, die Hilfe jedoch nicht entsprechend angepasst wurde.

[Sepp]

Hallo Alexander,

In Dialogs finde ich nur die folgende Definition

Delphi-Quellcode:

Function InputBox(const ACaption, APrompt, ADefault: string): string;
begin
  Result := ADefault;
  InputQuery(ACaption, APrompt, Result);
end;

Eine Überladung gibt es nur in QDialogs.

Ich würde die Funktion mir entsprechend selbst erstellen und InputQuery als Basis dafür machen
Das funktioniert dann auch in anderen Delphiversionen.

Grüße

Sepp

[ichbins]

inputquery gibt als bool zurück ob der User auf OK geklickt hat. inputbox ist dafür leicher zu handhaben.

[Sepp]

Zitat:

: ichbins : inputquery gibt als bool zurück ob der User auf OK geklickt hat. inputbox ist dafür leicher zu handhaben.

Hast du schon mal was von Paramteren gehört die als Var definiert sind?
zur Information

Delphi-Quellcode:

function InputQuery(const ACaption, APrompt: string;
  var Value: string): Boolean;

Über den Wert Value kannst du Die jederzeit den Eingabewert der Box holen und selbst bearbeiten
Dazu noch über den Rückgabewert ob Ok gedückt wurde. Also was braucht man noch mehr

Grüße

[Alexander Roth]

@sepp: Es ist halt einfach eleganter min und max und nachkommastellen alles in einer Zeile zu erledigen.

Doch da Borland der Personal Usern den eleganten Zugriff versperrt bleibt mir wohl keine andere Möglichkeit als den Rückgabewert auf alles mögliche zu überprüfen.

Tschüss

Danke für eure tolle und schnelle Hilfe

[ichbins]

mit den var-parametern meine ich ja "schwerer zu handhaben"

@alex: du könntest ja auch dein eigenes Dialog-Form machen.

[Luckie]

Zitat von Helmi:

Um das zu verhindern schreib einfach:

Delphi-Quellcode:

uses
  QDialogs;

und schon gehts!

dann sag ihm aber bitte auch die ganze Wahrheit und teile ihm mit, dass er dann noch meherer MB an DLLs mitausliefern darf, damit das Programm läuft.

[daniel_0]

Hi Leute!

ich hab ein kleines, aber irgendiwe sehr ärgerliches Problem mit der Inputbox und komme einfach nicht weiter.

Ich möchte einfach einen String mit wenigen Zeichen über eine Inputbox einlesen. Die Variable ist global deklariert! Die Inputbox wird beim Laden einer Form aufgerufen.
Sobald ich das Programm starte, erscheint die Box mit dem im Sourcecode vordefinierten Default Text.
klicke ich jetzt allerdings in das Textfeld der Inputbox, hängt sich das Programm auf. Die Systemauslastung des Prozesses steigt auf 100% und das Programm lässt sich nur noch über den Task Manager beenden.
Lege ich die Variable statisch, also direkt über eine Zuweisung aus dem Sourcecode fest, funktioniert alles wunderbar.

Ich werde euch den Sourcecode mal eben unter mein Problem stellen, vielleicht hat ja jemand von euch eine Idee, ich schätze dass die Lösung ganz einfach ist nur dass ich einfach nicht drauf komme.

Delphi-Quellcode:

procedure TMainForm.FormCreate(Sender: TObject);
begin
  path:=Inputbox('Eingabe','Gib hier den Pfad an:','C:\');
  if fileexists(path + 'muh.txt') then
    stdMemo.Lines.LoadFromFile(path + 'Session.txt');
end;

Besten Dank im Voraus!

[Phoenix]

Neue Frage -> Neues Thema.

Und bitte keine Themen von anderen Leuten entführen.