Autor Beitrag
XPert
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 129

Windows 98/00/Me/XP
D6 Pers
BeitragVerfasst: Di 22.10.02 19:47 
HI!
ich hab da mal wieder #n problem....
ich hab ein programm geschrieben, was den startbutton kontolliert!
wenn man es schliessen will kommt eine InputBox. wenn ich das richtige passwort eingebe, soll alles geschlossen werden, wenn falsches passwort dann soll nicht geschlossen werden!
kapiert?
na dann postet... :wink:

_________________
MfG Fabian Schweers :lol:
DeCodeGuru
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1333
Erhaltene Danke: 1

Arch Linux
Eclipse
BeitragVerfasst: Di 22.10.02 19:53 
Zitat:
wenn man es schliessen will kommt eine InputBox. wenn ich das richtige passwort eingebe, soll alles geschlossen werden, wenn falsches passwort dann soll nicht geschlossen werden!


was will jemand schließen? Was soll alles geschlossen werden?

Zitat:
kapiert?


Dreimal darfst du raten :wink:

_________________
Viele Grüße
Jakob
XPert Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 129

Windows 98/00/Me/XP
D6 Pers
BeitragVerfasst: Di 22.10.02 19:56 
mit alles meine ich form1 und form2

_________________
MfG Fabian Schweers :lol:
XPert Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 129

Windows 98/00/Me/XP
D6 Pers
BeitragVerfasst: Di 22.10.02 20:00 
oder kann man das schliessen vielleicht ganz verhindern?
das wäre ja :beer:

_________________
MfG Fabian Schweers :lol:
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Di 22.10.02 20:51 
Du willst uns erzählen, du hast es geschafft, den Startbutton zu deaktivieren und scheiterst aber an so einen trivialen Grundlagenproblem? :shock:

if und = sollten dir weiter helfen. Letzendlich läuft es doch auf einen simplen Stringvergleich hinaus.

Und wie man verhindert, dass die Form geschlossen werden kann, solltest du selber rausfinden, wenn du dir mal die Ereignisse von der Form ankuckst. Besonders interessant sind die Ereignisse, bei denen ...Close... im Namen vor kommt.
DeCodeGuru
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 1333
Erhaltene Danke: 1

Arch Linux
Eclipse
BeitragVerfasst: Di 22.10.02 20:53 
Zitat:
Und wie man verhindert, dass die Form geschlossen werden kann, solltets du selber rausfinden, wenn du dir mal die Ereignisse von der Form ankuckst. Besonders interessant sind die Ereignisse, bei denen ...Close... im Namen vor kommt.


Noch genauer kannst du es auch nicht mehr schreiben :mrgreen:

_________________
Viele Grüße
Jakob
Tino
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Veteran
Beiträge: 9839
Erhaltene Danke: 45

Windows 8.1
Delphi XE4
BeitragVerfasst: Di 22.10.02 21:02 
Beim tForm gibt es das Event OnCloseQuery. Dieses Event könntest Du in etwa so benutzen:
ausblenden Quelltext
1:
2:
3:
4:
5:
procedure Tform1.FormCloseQuery(Sender: TObject;
  var CanClose: Boolean);
begin
  CanClose := False;
end;


Gruß
TINO
Maggi
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 160

WIN XP, WIN 2003
D5 Enter D 2006
BeitragVerfasst: Mi 23.10.02 07:45 
Tach,

ich versuche einmal die Antwort von Tino zu erweitern (nein, wie anmaßend :wink: ):

Das mit der OnCloseQuery ist schon der richtige Ansatz, du fragst dann einfach bei der Passwortabfrage den String ab den du erwartest und setzt dann die BooleanVar (z.B. CanClose) die du dir vorher gebaut hast auf True und sagst close. Dann sollte dein Proramm sich schließen lassen sonst nicht.

Ach ja du solltest die CanClose natürlich vorher mit False initialisieren!!!

Gruß

Maggi
Hagbard Celine
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 119



BeitragVerfasst: Mi 23.10.02 08:00 
Hab da mal ne Frage die deine nicht beantwortet, aber wohl auch ganz nett ist!

Wie hast Du den start button deaktiviert???
Tino
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Veteran
Beiträge: 9839
Erhaltene Danke: 45

Windows 8.1
Delphi XE4
BeitragVerfasst: Mi 23.10.02 08:30 
Maggi hat folgendes geschrieben:
ich versuche einmal die Antwort von Tino zu erweitern

Sorry, hatte wohl nicht die ganze Frage gelesen. Danke das Du es weiter erklärt hast.

Gruß
MathiasSimmack
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mi 23.10.02 08:42 
Hagbard Celine hat folgendes geschrieben:
Wie hast Du den start button deaktiviert

Der EDH hält diese Möglichkeit bereit:
ausblenden Quelltext
1:
2:
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd',nil),
  0,'Button',nil),TRUE{FALSE});

Dein Dank gilt bitte dem, leider nicht genannten, Verfasser dieses Beitrags.

Nachtrag: Ich nehme jedweden "Spaßvögeln" nur ungern die Illusion. Aber mit einer WIN-Taste auf dem Keyboard, bzw. mit der Tastenkombination STRG+ESC ist man vor jeglichem Unsinn sicher und kann das Startmenü dennoch aufrufen.

Luckie hat folgendes geschrieben:
Du willst uns erzählen, du hast es geschafft, den Startbutton zu deaktivieren und scheiterst aber an so einen trivialen Grundlagenproblem?

Ich bitte um Verzeihung, Luckie, aber es sind meist gerade die einfachen Dinge, auf die man nicht mehr kommt, weil man sich zu sehr in anderen Sachen verbissen hat.
Es gibt da dieses schöne Klischee vom Wissenschaftler, der zwar die Zahl Pi auf tausend Nachkommastellen im Kopf berechnen kann, aber zu dusselig ist, sich eine Suppe zu kochen. (Ich kann übrigens beides nicht :wink:)
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mi 23.10.02 11:56 
OK, dann nehme ich alles wieder zurück. Komisch kommt es mir allerdings immer noch vor.

Na so ne Tütensuppe bekommst du doch wohl noch hin oder? Was meinst du wo von ich mich so ernähre, seit ich ausgezogen bin. :x
Udontknow
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2596

Win7
D2006 WIN32, .NET (C#)
BeitragVerfasst: Mi 23.10.02 12:03 
Zitat:
Du willst uns erzählen, du hast es geschafft, den Startbutton zu deaktivieren und scheiterst aber an so einen trivialen Grundlagenproblem?


In manchen Foren wird so etwas das "Bastler"-Syndrom genannt... :wink:
XPert Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 129

Windows 98/00/Me/XP
D6 Pers
BeitragVerfasst: Mi 23.10.02 16:19 
ich mache das mit dem startbuttom über die kompo abfStartButton!

_________________
MfG Fabian Schweers :lol:
MathiasSimmack
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mi 23.10.02 17:12 
Mit einer Komponente? Obwohl der Code zum Deaktivieren gerade mal eine Zeile lang ist? :?

Was ist denn da noch dabei?
Wenn die Komponente auch nicht mehr macht als der Beispielcode aus dem EDH, dann würde ich nämlich sagen: das ist in etwa so witzlos wie diese Manifest-Komponente von Delphi 7.
XPert Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 129

Windows 98/00/Me/XP
D6 Pers
BeitragVerfasst: Mi 23.10.02 18:19 
die kompo kann alle möglichen einstellungen vornehmen.... bild und schrift layout(größe, form) ändern! in farbe größe schriftart...... ob enabled oder nicht ob visible oder nicht :twisted:

probleme damit? :wink:
Udontknow
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2596

Win7
D2006 WIN32, .NET (C#)
BeitragVerfasst: Do 24.10.02 07:59 
@MathiasSimmack:

Was denn? Ich habe noch nie einen sauberer geschriebenen TComponent-Nachfahren gesehen.
MathiasSimmack
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Do 24.10.02 08:14 
Wie: was denn? Den Inhalt der Komponente habe ich mir nicht angesehen.

Ich wollte nur wissen, was an ihr noch "dran" oder "drin" ist, weil der Code zum Deaktivieren des Start-Buttons im Prinzip nur eine Zeile lang ist. Der zum Verstecken basiert auf dem selben Prinzip:
ausblenden Quelltext
1:
2:
ShowWindow(FindWindowEx(FindWindow('Shell_TrayWnd',nil),
    0,'Button',nil),SW_HIDE {SW_SHOW});


Außerdem, ich sag´s noch mal:
Wer eine WIN-Taste auf dem Keyboard hat, oder die Kombi STRG+ESC benutzt, der kriegt das Startmenü trotzdem auf - egal ob der Button deaktiviert oder unsichtbar ist.
Udontknow
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2596

Win7
D2006 WIN32, .NET (C#)
BeitragVerfasst: Do 24.10.02 11:48 
Die Komponente noch nicht angesehen? Machs mal. Das ist so klar geschrieben, einfach toll! :mrgreen: