[Delphi] DOS command

[Verwijderd]

halo,

Ik heb een vraagje
hoe kan je in delphi een dos prompt openen met een bepaalde command bv ping
ik heb de volgende regel gebruikt maar het lukt niet echt

WinExec('COMMAND.COM /C DIR *.*', SW_SHOWNORMAL);

[pjvandesande]

Je kan toch gewoon een batch bestand starten die dit voor je doet?

[Erkens]

Verwijderd schreef op maandag 27 december 2004 @ 15:06:
halo,

Ik heb een vraagje
hoe kan je in delphi een dos prompt openen met een bepaalde command bv ping
ik heb de volgende regel gebruikt maar het lukt niet echt

WinExec('COMMAND.COM /C DIR *.*', SW_SHOWNORMAL);

dat werkt prima, alleen sluit de dosbox meteen zodra hij klaar is

[FendtVario]

Of direct het command ping uitvoeren. Er zijn ook manier om de console te lezen (en dus ook wel om te schrijven). Hier een stukje code dat ik op internet vond met de termen delphi read console

[Verwijderd]

tnx

[Verwijderd]

WinExec('COMMAND.COM /C DIR *.*', SW_SHOWNORMAL);

dus als hij klaar is, sluit ie weer af

maar als ik schrijf telnet, dan sluit ie ook.

waar precies moet je die command nou schrijve tusse die twee * ??

[pjvandesande]

Wat wil je precies doen? Want ik heb het gevoel dat er veel meer oplossingen zijn voor jou probleem. Command sluit gelijk weer, maar voer maar is een ping uit. Dan sluit command pas als de ping is uitgevoerd.

Je kan de output stream ook gewoon uitlezen, hoef je geen window te showen. Maar nogmaals, wat wil je precies doen?

toevoeging:

Verwijderd schreef op maandag 27 december 2004 @ 15:27:
[..]
waar precies moet je die command nou schrijve tusse die twee * ??

Nee, dat is je dir filter. Kijk is naar de arguments die Command.exe aanneemt en probeer hier is wat mee te spelen.

Ik weet niet precies wat je nou wilt, een ping command uitvoeren in het command window?

[ Voor 39% gewijzigd door pjvandesande op 27-12-2004 15:35 ]

[FendtVario]

Het programma sluit af omdat het klaar is met het uitvoeren van de opdracht. Als je de uitvoer dus wilt lezen (of wilt laten zien) zul je er dus voor moeten zorgen dat het programma niet direct gesloten wordt of dat je de uitvoer opvangt (bijv. via de code die ik hierboven gelinkt heb (heb ik alleen gevonden, niet getest)).

[Verwijderd]

kun je aub dat ene regel met ping hier zette ??


da's alles

[pjvandesande]

Verwijderd schreef op maandag 27 december 2004 @ 15:36:
kun je aub dat ene regel met ping hier zette ??


da's alles

Wat wil je nou precies? Wil je een ping actie uitvoeren? Wil je weten of een server up is en dit in je applicatie laten zien? Wil je echt iets pingen en in een command window? Wil je de ping results?

[LordLarry]

Delphi heeft ook componenten om zelf een ping uit te voeren en er mee te doen wat je wilt. Geen moeilijk console afvang gedoe. Bijvoorbeeld Indy's TIdICMPClient.

[FendtVario]

Verwijderd schreef op maandag 27 december 2004 @ 15:36:
kun je aub dat ene regel met ping hier zette ??
da's alles

Zoals ik zei had ik alleen een code voorbeeldje opgezocht om een console te lezen. Bekijk en probeer die eens, pas het aan als jij iets anders wilt. Op internet is waarschijnlijk zat te vinden. Zelf heb ik geen programma(voorbeeld) dat een console leest.

Als je inderdaad alleen een ping wilt uitvoeren probeer dan zoals LordLarry zegt eens de Indy componeten.

[ Voor 2% gewijzigd door FendtVario op 27-12-2004 16:15 . Reden: smilies in quote verwijderd ]

[Erkens]

Verwijderd schreef op maandag 27 december 2004 @ 15:36:
kun je aub dat ene regel met ping hier zette ??


da's alles

Delphi:

WinExec('ping -t 127.0.0.1', SW_SHOWNORMAL); 

[pjvandesande]

Als je echt wilt pingen lijkt mij een ping components iets makkelijker of zelf even een ping component in elkaar drukken dmv sockets. Is zat over te vinden op het internet, ook voor Delphi.

[FendtVario]

Erkens schreef op maandag 27 december 2004 @ 16:20:

Delphi:

WinExec('ping -t 127.0.0.1', SW_SHOWNORMAL); 

Dat kan natuurlijk, maar dat stopt nooit . Expres niet gepost omdat ik vermoedde dat dit voor de TS ook niet de juist op lossing is (als dat het wel is wil ik wel eens weten wat het voor nut heeft).

[Erkens]

FendtVario schreef op maandag 27 december 2004 @ 16:29:
[...]


Dat kan natuurlijk, maar dat stopt nooit . Expres niet gepost omdat ik vermoedde dat dit voor de TS ook niet de juist op lossing is (als dat het wel is wil ik wel eens weten wat het voor nut heeft).

natuurlijk, maar zonder info van de TS is dit een juiste oplossing, en dat die nooit stopt tja haal de -t weg of druk op ctrl-c enzo, niet mijn probleem.

Overigens kan dit soms best wel nuttig zijn om het zo te doen, als je toch zelf niks met de info verder doet

[Megamind]

Op torry hebben ze wel een leuk componentje die je een commandline kan sturen en die de output in een memotje oid zet ben er toevallig zelf ook mee bezig

[FendtVario]

Megamind schreef op maandag 27 december 2004 @ 16:38:
Op torry hebben ze wel een leuk componentje die je een commandline kan sturen en die de output in een memotje oid zet. ben er toevallig zelf ook mee bezig

Als je dat componentje dan toch al gevonden hebt en er over begint zou een linkje wel gewaardeerd zijn .

[Verwijderd]

oké mense ik weet genoeg

bedankt voor de moeite