| Autor |
Beitrag |
koller1
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Di 07.06.05 16:44
Hallo!
Ich habe versucht, ein kleines Chatprogramm für das PC-Kabinett zu programmieren! Bis hier bin ich schon, jetzt weiß ich nicht weiter! Kann mir einer weiterhelfen? Ich habe das Programm in den Anhang geschoben!
MFG
koller1
Einloggen, um Attachments anzusehen!
|
|
F34r0fTh3D4rk
      
Beiträge: 5285
Erhaltene Danke: 28
Win Vista (32), Win 7 (64)
Eclipse, SciTE, Lazarus
|
Verfasst: Di 07.06.05 16:56
und was solln wir jetzt machen ?
was fehlt dir denn da genau ?
Hä ?
|
|
koller1 
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Di 07.06.05 19:27
Ich hatte dazu ein Tutorial, aber wo der Autor sagte, dass sollte jetzt schon funktionieren, da ging es bei mir nicht!
Ich komme ab dem Punkt dann nicht mehr weiter!
Ich schicke euch das Tutorial mal!
MFG
koller1
Einloggen, um Attachments anzusehen!
|
|
koller1 
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Di 07.06.05 20:35
Und, habt ihrs hingekriegt? Wenn ja, könntet ihr mir vielleicht das mal schicken?
MFG
koller1
|
|
VitaminC
      
Beiträge: 21
|
Verfasst: Di 07.06.05 21:35
Hallo!
Ich bin mal das Tutorial mal durchgegangen. Es fehlt eine Kleinigkeit
Der ServerSocket müsste noch aktivert werden, sonst kann er ja nicht arbeiten.
Also einfach im Projekt Server die Eigenschaft "Active" von der ServerSocket-Komponente auf "True" setzen.
Oder noch einen Button hinzufügen und das dann dort erledigen, wenn der Server später gestartet werden soll.
Gruß
VitC
|
|
koller1 
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Mi 08.06.05 13:56
Und dann funktioniert alles? Im Tutorial nämlich gelesen, man soll beim Memo auf "onclientread" gehen soll, aber das finde ich bei mir nicht! (D7 Enterprise)! Wie gehts das??
MFG
koller1
|
|
ScRiPtKidDiE
Hält's aus hier
Beiträge: 9
WinXP
D7 Perso
|
Verfasst: Fr 10.06.05 15:23
also ich hab Delphi7 Personal und Indy10 geholt...
mir das Tutorial angeschaut und das Bsp von oben gesaugt..
Ich hab nach der Komponente 'ClientSocket' alles in Delphi abgegrast...alles nachgeschaut was ähnlich klingt...
aber: Mein Delphi kennt die Komponente nicht?????
Kann mir da vielleicht wer helfen?
Gruß ScRiPtKidDiE
|
|
der_zaehe
      
Beiträge: 317
WinXP SP2
D6 Pers, D2005 Prof, VS2005
|
Verfasst: Sa 11.06.05 13:20
wenn du die ganz normalen, alten sockets suchst, dann installier doch einfach das package dclsockets70.bpl oder so ähnlich nach.
dann müsstest du die kompos haben
_________________ [inspirationslos]
|
|
Marco D.
      
Beiträge: 2750
Windows Vista
Delphi 7, Delphi 2005 PE, PHP 4 + 5 (Notepad++), Java (Eclipse), XML, XML Schema, ABAP, ABAP OO
|
Verfasst: Sa 18.06.05 21:54
Titel: Chat
Das programm funzt bei mir auch einwandfrei. Ich will das insofern erweitern, dass man einzelnen Usern im netzwerk den chatbetrieb verbieten kann. Kann ich aus dem serverprogramm aus irgenwie über den serversocket den clientsocket auf dem jeweiligen PC deaktivieren?
Gibt es für die Problemstellung vielleicht ne andere lösung? Bis sonntag abend bräuchte ich ne antwort!
|
|
Narses
      

Beiträge: 10185
Erhaltene Danke: 1261
W11x64
TP3 .. D7pro .. D10.2CE
|
Verfasst: So 19.06.05 00:09
Moin!
Koller hat folgendes geschrieben: | | einzelnen Usern im netzwerk den chatbetrieb verbieten kann. Kann ich aus dem serverprogramm aus irgenwie über den serversocket den clientsocket auf dem jeweiligen PC deaktivieren? |
Mach doch einfach den Socket auf dem Server zu, dann kann der Client rumhampeln wie er will:
Delphi-Quelltext 1:
| ServerSocket1.Socket.Connections[?].Close; |
Musst natürlich die "richtige" Socketverbindung trennen (-> .Connections[ ?] s.o.), aber das ist dann dein Teil der Aufgabe!
cu
Narses
//EDIT: Hab mir mal das Tutorial angesehen; kann ich für meinen Geschmack nicht empfehlen, didaktisch schlecht gemacht. 
|
|
Marco D.
      
Beiträge: 2750
Windows Vista
Delphi 7, Delphi 2005 PE, PHP 4 + 5 (Notepad++), Java (Eclipse), XML, XML Schema, ABAP, ABAP OO
|
Verfasst: So 19.06.05 17:19
Titel: Chat
Wir haben 17 rechner (PC101, PC102 ... bis PC117) im netzwerk. angenommen alle haben das chatprogramm geöffnet. Wie krieg ich denn nun raus welche Zahl ich für das Fragezeichen in deinem bsp. schreiben muss. Sagen wir mal ich will PC110 sperren.
Woher weiß ich welche Zahl zu welchem Client gehört?
Bitte heute abend ne antwort!
|
|
JayEff
      
Beiträge: 2971
Windows Vista Ultimate
D7 Enterprise
|
Verfasst: So 19.06.05 17:42
nun
ganz einfach. du musst dir merken, wann der entsprechende PC connected. der erste PC der zugreift ist [0] der zweite ist [1]... und so weiter.
PS:
[x] ist immer ein index. das heist, du hast es mit einer art von liste zu tun. in dieser liste kannst du nun auf die einzelnen elemente zugreifen. ähnlich wie bei memo1.Lines[1], was die zweite zeile des memos repräsentiert. das bedeutet für dich: von "PC110" kannst du nicht auf den index kommen. du musst das im programm managen.
_________________ >+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.
|
|
CeeJay D-Magic
      
Beiträge: 94
Win XP Prof.
Delphi 7, Lazarus 0.9
|
Verfasst: Mi 22.06.05 12:05
Ich schreib mal schnell nen Beispielproggi okay?
Morgen post ich ihn dann mal rein!
|
|
koller1 
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Mi 22.06.05 12:29
Ich danke dir! 
_________________ PLEASE INSERT SYSTEM DISK AND PRESS ENTER!
Und wenn du nicht gestorben bist, presst du noch heute!
|
|
Marco D.
      
Beiträge: 2750
Windows Vista
Delphi 7, Delphi 2005 PE, PHP 4 + 5 (Notepad++), Java (Eclipse), XML, XML Schema, ABAP, ABAP OO
|
Verfasst: Mi 22.06.05 21:07
Titel: Chat
WO kann ich das 'Beispielproggi' denn nun downloaden?
|
|
JayEff
      
Beiträge: 2971
Windows Vista Ultimate
D7 Enterprise
|
Verfasst: Mi 22.06.05 21:09
nun lass ihm doch zeit. er wirds doch höchstwahrscheinlic hier posten oO nich so ungeduldig xD
PS: warum hast du 2 accounts??? 
_________________ >+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.
|
|
Narses
      

Beiträge: 10185
Erhaltene Danke: 1261
W11x64
TP3 .. D7pro .. D10.2CE
|
Verfasst: Mi 22.06.05 23:07
Titel: Re: Chat
Moin!
Koller hat folgendes geschrieben: | | Bitte heute abend ne antwort! |
Hm, wann ich antworte, scheint mir doch noch meine Sache zu sein...
Koller hat folgendes geschrieben: | | Wir haben 17 rechner (PC101, PC102 ... bis PC117) im netzwerk. Wie krieg ich denn nun raus welche Zahl ich für das Fragezeichen in deinem bsp. schreiben muss. Sagen wir mal ich will PC110 sperren. Woher weiß ich welche Zahl zu welchem Client gehört? |
Du wirst einen Rechner beim Öffnen eines Sockets nicht 100%ig eindeutig erkennen können (jedenfalls ist das eine ganz schön komplexe Aufgabe, einen PC zweifelsfrei zu identifizieren). Wenn du die (aktuelle!) IP des Rechners, den du aussperren willst, kennst, dann kannste das darüber versuchen. Die Remote-IP wird als Eigenschaft der Connection im ServerSocket angegeben.
cu
Narses
|
|
CeeJay D-Magic
      
Beiträge: 94
Win XP Prof.
Delphi 7, Lazarus 0.9
|
Verfasst: Do 23.06.05 12:14
Sorry, bin noch nicht fertig geworden, aber morgenam freitag bekommst es auf alle fälle
Habe momentan eher weniger Zeit!
|
|
koller1 
      
Beiträge: 216
WIN XP
D7 Ent
|
Verfasst: Do 23.06.05 13:30
@ JayEff
Er hat nicht zwei Accounts! Das eine bin ich (koller1) und er ist koller(ein Freund von mir). Er ist Dortmund-Fan und hat sich deswegen koller genannt. Ich kann Dortmund nicht leider, habe mich aber, um ihn zu verarschen koller1 genannt! Soviel dazu!
MGF
koller1(eric)
_________________ PLEASE INSERT SYSTEM DISK AND PRESS ENTER!
Und wenn du nicht gestorben bist, presst du noch heute!
|
|
JayEff
      
Beiträge: 2971
Windows Vista Ultimate
D7 Enterprise
|
Verfasst: Do 23.06.05 15:55
oh. sowas...  wie auch immer, back to topic und so... ^^'
_________________ >+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.
|
|