Delphi-PRAXiS

Form H�he wird gr�sser, wenn das Programm startet !!!

Fri, 09 May 2008 19:50:26 +0200

Hallo

das Problem ich verwende auch einen Code, der den Titelleiste ausblendet (OnCreate)
Also es liegt bestimmt daran
aber was muss tun, damit die Form-H�he nicht sich �ndert beim Starten ?
Oder muss ich einfach in Event OnCreate die gew�nschte H�he eingen ?

Mit XPath Knoten ausw�hlen liefert alle Knotenwerte

Fri, 09 May 2008 12:34:56 +0200

Ich habe einen etwas komischen Effekt, den ich nicht verstehe.

Hier erst mal die zu Grunde liegende X;ML-Datei:

Kurzbeschreibung des Produktes
Ausf�hrliche, lange Beschreibung des Produktes
C3-45-87

Das ist nur ein Auschnitt.
Jetzt w�hle ich mittels XPath den Knoten items aus und iteriere durch die unterknoten:
nodeIter = nav.Select("/Catalog/Categories/Category /items/*");
while (nodeIter.MoveNext())
{
ProductItem prodItem = new ProductItem();
prodItem.Name = nodeIter.Current.GetAttribute("name", "");
nodeProduct = nav.Select("/Catalog/Categories/Category /items/item/shortdescription");
nodeProduct.MoveNext();
prodItem.ShortDescription = nodeIter.Current.Value;
nodeProduct = nav.Select("/Catalog/Categories/Category /items/item/longdescription");
nodeProduct.MoveNext();
prodItem.LongDescription = nodeIter.Current.Value;
nodeProduct = nav.Select("/Catalog/Categories/Category /items/item/itemIdentifier");
nodeProduct.MoveNext();
prodItem.ItemIdentifier = nodeIter.Current.Value;
productList.Add(prodItem);
}
Innerhalb der Schleife versuche ich auf die Unterelemente eines Items zu zugreifen. Komischerweise steht nach dem Aufruf von prodItem.ShortDescription = nodeIter.Current.Value; auch schon alle anderen Elemente in der Eigenschaft. Er hat sie also irgendwie alle auf einmal ausgelesen. das ist nat�rlich nicht brauchbar. Was muss ich anders machen, damit ich gezielt auf die Elemente zugreifen kann?

Transparente Buttons?

Fri, 09 May 2008 21:49:46 +0200

Huhu ich wollte mal fragen wie man solche:
(Bild: http://msdn.microsoft. ... /Bb328626.visind18(en-us,MSDN.10).png )
Button hinbekommt?
Ich w�rde nur zu gerne auch solche Buttons benutzen um in meinem Programm auch das gewisste Vista Feeling unter zu bringen.

Welche Kamera soll ich mir kaufen? Plz help...

Fri, 09 May 2008 20:14:30 +0200

Hallo leute,
ich stehe in einer verzwickten Lage, denn ich habe keine Ahnung, welche Kamera die beste ist... Ich w�rde gerne eine von denen kaufen:
http://www.amazon.de/S ... 1210351721&sr=1-12
http://www.amazon.de/C ... =1210351721&sr=1-7
http://www.amazon.de/O ... 1210352709&sr=1-17

Bloss welche Kamera ist die beste? Vielleicht kennt Ihr auch andere gute Kameras... jedoch m�chte ich nicht mehr als 300� bezahlen...

SystemInfo 1.4.3

Thu, 31 May 2007 00:03:46 +0200

Hallo zusammen,

ich schreibe gerade an einem Programm, welches die Systeminfos vom PC ausliest. Aktuell ist das Programm in der Version 1.4.3 verf�gbar. Downloadm�glichkeiten weiter unten.

Produktbeschreibung :
In der aktuellen Version verf�gt das Programm �ber die folgenden Funktionen :

* Auslesen der Betriebssystemdaten
* Auslesen des aktuell angemeldeten Benutzer und Computernamens
* Auslesen von Hardwaredaten (Bildschirmaufl�sung, Farbtiefe, Prozessor und Arbeitsspeicher)
* Auslesen der Hardware (mit Infos vom BIOS, Mainboard und Monitor-Daten)
* Auslesen und Erkennung eines Novell Clients und/oder eines Zenworks-Agents
* Auslesen der lokalen Laufwerke und der physikalischen Laufwerke
* Auslesen der Netzwerkkarten, dessen Konfiguration und Treiberversion
* Auslesen der aktuellen Internetverbindung mit IP-Adresse
* Auslesen der installierten Software mit Angabe der Versionen von DirectX, BDE, MDAC, Browser, Windows Media Player, Microsoft Office
* Auslesen der installierten Schriftarten
* Auslesen der installierten Drucker
* Auslesen der userspezifischen und systemspezifischen Umgebungsvariablen
* Auslesen der registrierten Dateierweiterungen

SystemInfo funktioniert unter Windows 2000, 2000 Server, 2003 Server, XP und unter Windows VISTA.

�ber ein Kontextmen� k�nnen noch die Prozessliste und die Liste mit den Diensten aufgerufen werden. Als zus�tzliches Feature kann alles in einem Report (RTF-Format) abgespeichert werden und ausgedruckt werden. Die Funktionen Speichern und ausdrucken stehen ebenfalls f�r die Prozessliste �ber ein Kontextmen� zur Verf�gung.
In dem Verzeichnis APPDATA wird eine INI-Datei zu dem Programm installiert. �ber diese INI-Datei k�nnen Sie einige Reiter im Programm ein- oder ausschalten. Als zus�tzliche Option k�nnen noch einen Hostnamen oder IP-Adresse angeben und einen festen Pfad zum abspeichern der Reports.

Download - Links :
selbstextrahierendes Archiv von der Homepage (Link: http://www.bis-program ... &ID=systeminfo-exe )
selbstextrahierendes Archiv von einem Mirror-Server (Link: http://www.bis-program ... D=m-systeminfo-exe )

Changelog :
Version 1.4.3 :
Erweiterung der Erkennung vom Betriebssystem auf Windows Server 2008
Name der Netzwerkverbindung anzeigen
Anzeige f�r die Netzwerkdaten im Splashscreen ge�ndert
Bei eingeschr�nkten Benutzerrechten werden keine Informationen zu den Dateitypen angezeigt
L1 & L2 Cache vom Intel-Prozessor werden falsch angezeigt
Rechtschreibfehler bereinigt
Codeoptimierung

Version 1.4.0 :
(Windows 2000/XP) Erkennung des Novell-Clients f�r Windows
(Windows 2000/XP) Erkennung des ZfD-Agents
Auslesen der MS-Office Version ab 2000 wird im Reiter "Software" angezeigt
Auslesen der Novell-Verbindungen
Die Gr��e des Papierkorb's wird angezeigt
Eine erweiterte Ansicht der Daten zu den Netzwerkkarten (Hardwarespezifische Daten)
Erkennung ob Novell-Software installiert ist
Monitortyp und Monitor Seriennummer auslesen (EDID-Protokoll)
Ansicht des Reiters "Betriebssystem" angepasst
Einige optische �nderungen
Jede installierte Versionsanzeige im Reiter "Software" in einen Rahmen setzen
Tempor�re Verzeichnisgr��e wieder hinzuf�gen
Die Option einen Trace durchzuf�hren entfernt
Aktualisierung der Prozentanzeige f�r den Ladestatus funktioniert nichtmehr
Anzeige vom Ladestatus korrigiert
Fehler beim Erstellen des Reports
Produktschl�ssel wird im Report nicht angezeigt

Version 1.3.5 :
BIOS-Seriennummer anzeigen, wenn vorhanden (z.B. bei Fujitsu Siemens Computer oder Dell)
Das Auslesen des L1 und L2 Cache von der CPU hinzugef�gt
Den Produkt-Key von Windows auslesen
Die Anzeige "Treiber-Version" unter die Anzeige "Grafikkarte" gesetzt
Es wird 64Bit bei den Betriebssystemen Windows XP und VISTA unterst�tzt
(Windows VISTA) Die Festplattentypen werden unter physikalische Laufwerke nicht angezeigt
(Windows XP) Programm startete mit einer Fehlermeldung
Der L1 & L2-Cache wird nicht im Report angezeigt

Version 1.3.0 :
Daten vom Motherboard per WMI auslesen
Die Interneterkennung f�r den Browser "Opera" hinzugef�gt.
Einen Reiter f�r die Dateitypen hinzugef�gt
Hinzuf�gen des Powerstatus & des Akkustatus ermitteln
Alle Monitore werden angezeigt und die Bildwiederholungsfrequenz
(Windows VISTA) Bei der Aktualisierung der Prozessliste gibt es noch Probleme
(Windows VISTA) Den Gruppeneintrag 'None' nicht anzeigen
(Windows VISTA) Es wird keine Domain oder Arbeitsgruppe angezeigt
(Windows VISTA) Fehler beim Holen der Daten f�r 'NoNetAutodial'
(Windows XP) Arbeitsgruppe und Mitgliedschaften bleiben leer bei einer Domainanmeldung
(Windows XP) Beim Anzeigen des Reiters "System" steigt der Speicherverbrauch
(Windows XP) Fehler beim Holen der Daten f�r 'EnableAutodial'
(Windows XP/VISTA) Die Bildwiederholfrequenz wird falsch angezeigt.
(Windows XP/VISTA) Es werden keine Drucker ermittelt
Den Fehler "Kein Argument f�r Format '%'" behoben
Der Speicherverbrauch steigt beim Zugriff auf WMI

Version 1.2.2 :
In der Schriftprobe werden auch umlaute angeziegt
Anordnung der Anzeige vom Speicher ge�ndert
Das Aussehen der Tabs in mehrzeilige Reihen umgestellt
Auslesen der Firefox-Daten korrigiert

Version 1.2.0 :
Die Liste der Dienste aktualisieren und die Anzeige im Titel ge�ndert
Die Liste der Dienste ausdrucken
Die Liste der Drucker in einem Abstand von 10 Sekunden aktualisieren
Eine Liste der installierten Drucker anzeigen
Einen Reiter mit Informationen �ber die Internetverbindung erstellt
Selektierte Schriftart in einer Vorschau anzeigen lassen
Version vom Windows Media Player unter Software anzeigen
Anzeige der Festplattengr��e nicht in Bytes sondern in einer passenden Gr��e
Anzeige der Gruppenzugeh�rigkeit ge�ndert
Aufbau des Reiters "System" ge�ndert und mehr Informationen werden angezeigt.
Bei der Anzeige "Registriert f�r" den Schr�gstrich weglassen, wenn keine Firma eingetragen ist.
Beim Trace die IP-Adresse aufl�sen in den DNS-Namen
DHCP-Server nur anzeigen, wenn DHCP aktiviert ist
Die Informationen zu den physikalischen Laufwerken erweitert
Die Schriftgr��e und Schriftart in dem Memo von den Laufwerksdaten ge�ndert
Icons der Anwendung ausgetauscht und erneuert
Keine Sonderzeichen im Eingabefeld Hostname zulassen
Struktur des Reports neu erstellt
Auslesen des physischen Arbeitsspeichers korrigiert, wenn gr��er 2GB
Die Berechnung der TEMP-Verzeichnisse korrigiert
Falsche Versionsanzeige, bei Firefox und Internet Explorer korrigiert

Zwei kleine Screenshots findet Ihr hier im Anhang.

Testen ist nat�rlich erw�nscht, aber das Feedback noch umso mehr. Schreibt mir ruhig viel Lob, Kritik, Bugs und auch Verbesserungsvorschl�ge. :wink:

Eine Bitte habe ich noch an euch, gebt bitte immer an, mit welchem Betriebssystem Ihr getestet habt. (z.B. Window XP SP2 32Bit oder Windows 2003 Enterprise Server SP1)

liste alle FTP Daten. hatt noch kleine Fehler

Fri, 09 May 2008 21:03:47 +0200

Da ich alle Daten eines FTP-Servers mit verzeichnissen listen muss und keine kompfortablere l�sung gefunden habe, habe ich mir selbst etwas zusammengeschrieben.

function how_dirs(laenge: string): integer;
var how_dir1, how_dir2: integer;
begin
for how_dir1:=0 to length(laenge) do
if laenge = '/' then ergebnis:= ergebnis+1;
end;

procedure bk;
var st: integer;
procedure bk2;
var s, z, d, dirs, dir: integer;
ex2, ex: boolean;
begin
form1.IdFTP1.List(form1.ListBox2.Items,'',ex);
dirs:= ergebnis;
ergebnis:= 0;
for z:=0 to form1.ListBox2.Count-1 do
begin
ex2:= true;
for d:=0 to length(form1.ListBox2.Items ) do
if form1.ListBox2.Items = '.'
then
begin
form1.ListBox1.AddItem(form1.dir.Text + '/' + form1.ListBox2.Items , TObject (form1));
ex2:= false;
end;
if ex2
then
begin
form1.ListBox3.AddItem(form1.dir.Text + '/' + form1.ListBox2.Items + '/', TObject (form1));
for dir:=0 to dirs do
form1.IdFTP1.ChangeDir('../');
// showmessage(inttostr(dir) + ' ' + inttostr(dirs));
end;
end;
how_dirs(form1.ListBox3.Items );
form1.IdFTP1.ChangeDir(form1.ListBox3.Items );
form1.Listbox3.Items.Delete(0);
end;
begin
// for st:=form1.ListBox3.Count-1 to 0 do
for st:=0 to 5 do
begin
bk2;
showmessage('toll' + form1.ListBox3.Items );
end;
end;

Die ersten Verzeichnisse werden richtig gelistet auch die Dateien (nicht auf dem bild) aber irgendwie kommt danach nur kauderwelsch (Sihe Bild) raus.
Ich weis nicht wo der Fehler ist.

Bereich beim Mouseover hervorheben

Fri, 09 May 2008 15:39:37 +0200

Hallo zusammen,

ich w�rde gerne einige Komponenten bei einem Mouseover optisch gruppieren / highlighten. Es gibt daf�r sicherlich viele verschiedene L�sungen, aber bevor ich alle selbst ausprobieren muss, w�rde ich gerne eine Meinung von jemandem h�ren, der sich hier auskennt.

So sollte das dann funktionieren:
- Sobald der Mauszeiger �ber einem festgelegten Bereich liegt, soll sich dieser einf�rben.
- Beim Verlassen des Bereiches wird dieser wieder transparent
- Es gibt mehrere solcher Bereiche, die ich gerne codeseitig mit x-y-Koordinaten festlegen w�rde.
- Die dar�berliegenden Komponenten sollten durchscheinen, also nicht wie im Mockup beim Label noch einen anderen Hintergrund zeigen.
- Das ganze muss sowohl unter Win2000 als auch WinXP funktionieren, auf Transparenzm�glichkeiten des XP-Manifests kann man sich also nicht verlassen.
- Es sollte zudem fl�ssig und resourcensparend funktionieren, also weder Flakern noch den Computer auslasten.

(Bild: http://img120.imagesha ... 0/highlightts9.gif )

Was w�re die beste L�sung daf�r?

Form verschieben

Fri, 09 May 2008 19:30:51 +0200

Hallo

wenn ich den Code in ein neues Projekt teste, funktioniert
aber wenn ich den Code in mein Programm teste, dann macht es nicht !

Was muss ich noch �berpr�fen ?

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
const
SC_DRAGMOVE = $F012;
begin
if Button = mbleft then
begin
ReleaseCapture;
Form1.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0);
end;
end;

Coole Programmierideen gesucht

Wed, 07 May 2008 13:58:56 +0200

Hi,
auch wenn es vielleicht nervt, w�re es ganz toll von euch wenn mir mal jemand sagen kann was ich mal programmieren k�nnte. Habe zwar Lust aber irgendwie keine z�ndene Idee. Was ich schon gemacht habe ist:
- Password Saver
- Sidebar
- Musik Player
- Windows Saubermacher
- Screen Saver

ICh wei� bis auch eins sind die eigentlich alel noch nicht fertig aber irgendwie ist das langweilig :) weiterzumachen an sowas. Also nochmals w�re echt toll von jemand der ein paar Ideen hat f�r ein Programm was so mittelschwierig/leicht ist. Mir kam grade die Idee ein Synchroniersirer f�r einen Ipod zu machen da Itunes ja zum Beispiel f�rs Verwalten von Notizen, Bildern und Kontakten gar keine Funktion hat, oder braucht das keienr? Es ist immer bl�d etwas zu programmieren was dann keiner braucht :) Also ich will ne Idee f�r ein Programm das nicht nur eine �bung ist sondern dass auch jemand braucht!

MFG Lars Wiltfang

Software mit MySQL-Komponente portieren

Fri, 09 May 2008 11:02:48 +0200

Vormittag!

Ich habe ein kleines Programm geschrieben, das nichts anderes macht als eine bestimmte Datei auszulesen sobald sie ge�ndert wurde, entsprechend zu parsen und die Wert dann in eine MySQL-Datenbank schreibt. Funktioniert auf dem Entwicklungs-PC, wo Delphi 2007 installiert ist, wunderbar.
Doch sobald ich das Progr�mmchen schnappe und damit auf einen anderne PC gehe, l�ufts nicht mehr. Und zwar bleibt die Software genau an der Stelle der Initialisierung der Datenbank-Verbindung stehen - ohne Fehlermeldung oder irgendwas.

Den MySQL-Connector in der korrekten Version (dieselbe wie die in der Entwicklung) hab ich auf allen den Testrechnern installiert. MySQL.Data kommt auch korrekt im Assembly-Cache an. Die Library in den Application Folder kopieren hab ich auch schon probiert, auch nix.

H�tte jemand einen Tipp, woran's dabei scheitert?

Danke, Stefan

Dateisuche - Stringuntersuchung

Fri, 09 May 2008 20:46:58 +0200

Hallo,

ich bin auf der Suche, nach einem Suchalgorithmus, der jeden Dateinamen untersucht, ob der zu suchende Ausdruck enthalten ist.
Beispiel: Ich gebe als Suchbegriff "System" an und will, dass das Programm auch die Datei "System32.dll" findet. Bisher hab ich leider nur einen Suchalgorithmus, der die Datei als gefunden wiedergibt, wenn der Dateiname exakt dem Suchbegriff entspricht.

Wei� jemand, wo ich so was finde???

Gru�

Welches Format f�r Datensatzstatus

Fri, 02 May 2008 11:23:23 +0200

Hallo,

ich f�ge Datens�tze in eine Tabelle ein, die folgenden Status annehmen k�nnen (diesen Status bekomme ich so aus einer Importdatei geliefert):

ANGL = Angelegt
INAK = Inaktiv
L�VM = L�schvermerk

Diese k�nnen jetzt nat�rlich auch gemeinsam auftreten, also ANGL INAK oder ANGL L�VM.

Derzeit wird der Status als VARCHAR Feld gef�hrt in dem ich den Status als Text ANGL, INAK, L�VM schreibe.

Nach dem Auslesen der DB stelle ich mit Pos() fest welcher Status vorliegt. Ich finde das jetzt nicht so wahnsinnig geschickt und w�rde das gerne �ndern, aber wie? Und wie kann ich gleich bei der SQL-Abfrage Datens�tze mit einem bestimmten Status erhalten?

Wobei der Vorteil der o.g. Methode w�re, dass bei zus�tzlichen Statusinformationen an der DB-Struktur nichts ge�ndert werden m�sste...

Danke,
Guido

Sniffer zeichnet keine gesendeten Pakete auf

Tue, 06 May 2008 14:32:48 +0200

http://www.magsys.co.u ... e/magmonsock11.zip

Diesen Source habe ich �bernommen und einiges daran ver�ndert, sodsas ich Warcraft III Pakete aufzeichne. Das Problem ist das keine Pakete aufgeziechnet werden die ich sende :D
Kann jemand sich das mal anschauen?

Problem mit UNION Select

Tue, 06 May 2008 16:13:48 +0200

Hallo

Ich habe ein Problem beim erstellen einer UNION

Beisp.
Tabelle 1
Tag
1
2
3
4
5
6
.
.
31

Tabelle 2

TAG_______|MERKMAL|PERSNR
01.01.2008...String.....|String
02.01.2008
03.01.2008
04.01.2008
05.01.2008
06.01.2008
.
.
31.01.2008...|String.....|String

SQL.SELECT PERSNR, dTAG( ) as Date, MERKMAL FROM TABELLE2
UNION 0 SELECT TAG, 0,0
FROM TABELLE1

Nun sollte das ganze so ausehen

DBGrid
PERSNR__1_2_3_4_5_6__31
001.....A..B..A..A..B..B..........C
002.....A..B..A..A..B..B..........C

In Access(Abfrage) funktioniert das.
Habe ich da einen Denkfehler? :wall:

Vielen Dank f�r eine Unterst�tzung

Ext Festplatte Laufwerks-Buchstabe zuweisen

Fri, 09 May 2008 19:45:32 +0200

Ja Hallo erst mal :-D

Ich h�tt' da mal ne Frage:

Ich hab eine "ganz" normale Festplatte die ja eigentlich IN den Computer geh�rt,
Nun habe ich diese aber in so eine ext-H�lle(die f�r sowas vorgesehen ist ) gesteckt
--> v�ila eine externe Festplatte.

Er erkennt sie auch ... installiert sie ... alles OK

ABER: Sie taucht nicht im Arbeitsplatz auf und hat im "Hardware sicher entfernen"-Dialog keinen Laufwerksbuchstaben

Kann es sein das ich diesen selbst zuordnen muss :?: :?: :?:

Wenn ja wie :?: :?: :?:

Also BITTE helft mir

:arrow: :arrow: DANKE