Dialogfenster - Tutorial

[Adrian112]

Hallo,

ich habe dieses Tutorial für den Tutorialwettbewerb (4. Platz :party:)bei DSDT geschrieben und möchte es euch hier zu Verfügung stellen.

Adrian

[STS301]

finde es sehr gut, habe einiges dazugelernt! :thumb: :thumb:

[Adrian112]

Danke! :-D

[OldGrumpy]

Kleiner Denkanstoss meinerseits:

Delphi-Quellcode:

if Application.MessageBox('Wollen sie das Programm beenden?', 'Frage', 36) = IDYES then close;

Zitat:

Für IDYES hätte man auch einfach 6 einsetzen können, aber ich finde
das man den Quelltext so besser versteht und er leichter zu lesen ist.

Das gilt nicht nur für das IDYES sondern auch für die 36 weiter vorne in der Zeile. Wenn man sich angewöhnt, die vordefinierten Konstanten konsequent zu nutzen, bleibt der Code auch für Dritte leicht verständlich. :)

Eine Marginalie noch: Es hätte nicht geschadet, mal die Rechtschreibkorrektur drüber zu jagen. Sachen wie "Rotine" sehen schon etwas putzig aus :) In erster Linie kommts zwar auf den transportierten Inhalt an, aber die B-Note ist auch wichtig :)

[fLaSh11]

Dir ist es gelungen, ein Tutorial zu schreiben, dass übersichtlich ist, man flüssig lesen kann und dabei nicht die Lust verliert.

[Luckie]

Das

Zitat:

Wie kommt der Flags-Wert 35 zustande?

hättest du nicht schreiben müssen, wenn du es richtig gemacht hättest, nämlich die Konstante bitweise Or-Verknüpft:

Code:

MB_ICONQUESTION or MB_YESNOCANCEL

Dass deine Addition funktioniert ist Zufall, weil die Addition hier zufälligerweise das selbe Ergebnis liefert wir die Or-Verknüpfung.

[bacci]

Zitat:

Zitat von Adrian112

Hallo,

ich habe dieses Tutorial für den Tutorialwettbewerb (4. Platz :party:)bei DSDT geschrieben und möchte es euch hier zu Verfügung stellen.

Adrian

KLasse gemacht, sehr hilf und Lehrreich, vielen Dank ....


LG.Bacci

[Luckie]

Also um ehrlich zu sein, ich finde es etwas mager. Aber wenn man dafür schon auf den vierten Platz landet... Ich hätte mal mein COM-Tutorial (http://www.michael-puff.de/Developer/Delphi/Tutorials/) einschicken sollen. :roll:

[Lill Jens]

Quelle : Borland Delphi 7 Grundlagen, Profiwissen, Kochbuch - Verlag: Hanser

Steht fast genau so drin...vorallem die grafiken...mhh

[Adrian112]

Das kann nicht sein, da ich dieses Buch nicht besitze! Welche Grafiken meinst du? Sind da vielleicht auch die Icons in der Tabelle drin?

[taaktaak]

Moin, Moin,
die Ähnlichkeiten sind in der Tat frappierend! Aber vielleicht ist das ja wirklich ein Zufall...
:duck:

[Lill Jens]

Zitat:

Zitat von Adrian112

Das kann nicht sein, da ich dieses Buch nicht besitze! Welche Grafiken meinst du? Sind da vielleicht auch die Icons in der Tabelle drin?

Ja die Icons sind auch in der Tabelle drin. Mhh wär schon ein komischer Zufall...abba will dir da auch nichts Unterstellen mir kams nur etwas komisch vor...

[Luckie]

Nun ja, die Icons sind eben überall gleich und sie in einem entsprechendem Tutorial abzubilden wäre auch nicht ungewöhnlich. Was den Text betrifft, kann ich nichts zu sagen, da ich das Buch nicht besitze. Aber auch wenn Texte aus anderen Quellen entnommen wurden, wäre das kein Problem, so lange die Quellen genannt werden.

[xZise]

Hi Adrian,
eine Sache zur MessageBox: Ein weiterer Vorteil ist, dass man nicht umbedingt ein TApplication Objekt benötigt sondern die Unit Windows reicht.
So könntest du folgendes schreiben:

Delphi-Quellcode:

program HalloWelt;

uses
  Windows;

begin
  MessageBox(0, PChar('Hallo Welt'), PChar('Hallo Welt'), MB_OK or MB_ICONINFORMATION);
end.

Man muss nur eben noch ein Handle übergeben (meißtens geht das direkt über die Property Handle).

Außerdem hat MessageBox den ultimativen Vorteil, dass man es auch als WideString Variante verwenden kann!

Auch wenn der Wettbewerb gelaufen zu scheint, würde ich dennoch einiges korrigieren.
Übrigens: Unter Windows ist es standard einen Zeilenumbruch mit "#13#10" zu schreiben und nicht nur mit "#13". Gleicher Effekt, aber andere Bedeutung. Sobald du nämlich einen String hast ohne #10 nach dem #13 wirst du z.B. ein Problem mit dem TMemo bekommen. Dieses wird nicht umbrechen.
Außerdem korrigiere Rotine in Routine. Außerdem statt "+" ein "or" verwenden (wie Luckie schon sagte) und lasse es mit dem 35 und der Erklärung, weil dass würde zu Umfangreich, sondern schreibe gleich die Konstanten.
Dies widerspräche sich nicht mit dem Text, als du Rückgabe-Werte verwendest.
Hebe übrigens Wörter hervor, welche aus dem Code sind:

Zitat:

Delphi-Quellcode:

procedure Entferne(const Text : string; const DelChar : Char)

Im Text werden alle Zeichen entfernt, welche mit dem DelChar identisch sind.

Ist Text nun als Variable oder als Wort zu verstehen?
Ich würde dann einfach die Wörter kursiv machen.

MfG
xZise

[dajuhsa]

Zitat:

Zitat von Lill Jens

Zitat:

Zitat von Adrian112

Das kann nicht sein, da ich dieses Buch nicht besitze! Welche Grafiken meinst du? Sind da vielleicht auch die Icons in der Tabelle drin?

Ja die Icons sind auch in der Tabelle drin. Mhh wär schon ein komischer Zufall...abba will dir da auch nichts Unterstellen mir kams nur etwas komisch vor...

naja es gibt nicht allzuviele Möglichkeiten, eine Tabelle anders zu gestalten, oder?

PS: kleiner Fehler im ersten Satz bei InputQuery, da steht nämlich InputBox statt InputQuery

[divBy0]

Also ich finde das Tutorial für Einsteiger sehr gelungen. Es zeigt doch eine gute Übersicht der Standard-Dialoge.