-
Gesamte Inhalte
38 -
Benutzer seit
-
Letzter Besuch
Über Paddy92
- Geburtstag 07/25/1992
-
Hallo Leute ... Ich hab ma ne Frage: Können die Nachrichten die über den Windows Nachrichtendienst geschickt werden vom Administrator des Netzwerks gelesen werden? Wenn ja, wie funktioniert das, gibt es so eine art Protokoll? Wär cool wenn ihr was dazu wisst ... Gruß Paddy
-
record objekt oder klassentyp erforderlich
Paddy92 antwortete auf Paddy92's Thema in Delphi/RPG+CL/Sonstige
Hey ho... Danke für eur Hilfe ;-) Zum Glück gibts Leute dies blicken ! :-D Gruß Paddy -
DBF Datei (400.000 Zeilen) mit Excel öffnen
Paddy92 antwortete auf Paddy92's Thema in Anwendungssoftware
Danke erstmal ... Und es funktioniert nicht das ich das in Excel auf mehrere Tabellen splitte ?! Gruß Paddy -
Hallo Leute ... Könnt ihr mir helfen ?! Ich hab en kleines Problemchen ... und zwar hab ich eine .dbf Datei, welche über 400.000 zeilen lang ist. Da die Zahl der Zeilen bei Excel begrenzt ist, wollte ich euch fragen wie man eine solche Datei öffnet, dass sich diese über mehrere Tabellen erstreckt. (alternativ wäre es auch toll wen ihr mir helfen könntet einen gute Freeware DBF Editor zu suchen. Ich hab schon so manche ausprobiert ... aber die meisten besitzen keine Funktionen ... oder sie stürzen bei einer so großen Datei (140 mb) ab. Danke schonmal ! Gruß Paddy Mit Zitat antworten
-
record objekt oder klassentyp erforderlich
Paddy92 antwortete auf Paddy92's Thema in Delphi/RPG+CL/Sonstige
Ja klar sorry ... is natürlich Delphi ! Danke Leute ... hab das Problem gelöst ... aber es gibt schonwieder das nächste ... Er zeigt mir alles an ! nur nicht *über und untergewicht bei der Altersklasse mitte 40! Ich check aber ned warum ... Hier der Code: unit UBMI; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) gewicht: TEdit; Label1: TLabel; groesse: TEdit; bmi: TLabel; Label3: TLabel; Button1: TButton; schliessen: TButton; status: TLabel; RadioButton1: TRadioButton; RadioButton2: TRadioButton; Alter: TLabel; editalter: TEdit; Altersklasse: TLabel; Label2: TLabel; procedure Button1Click(Sender: TObject); procedure schliessenClick(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } end; var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject); var valtersklasse: String; valter, vgewicht, vgroesse, vbmi: real; vmann: boolean; begin valter:=StrtoFloat (editalter.text); If valter < 18 then Altersklasse.Caption:= ('Jugendlich'); If (valter > 19 ) and (valter < 30 ) then Altersklasse.Caption:= ('Mitte zwanzig'); If (valter >29) and (valter < 40 ) then Altersklasse.caption:= ('Mitte dreißig'); If (valter >39) and (valter < 50 ) then Altersklasse.caption:= ('Mitte Vierzig'); If (valter >49) and (valter < 60 ) then Altersklasse.caption:= ('Mitte fünfzig'); If (valter >59) and (valter < 70 ) then Altersklasse.caption:= ('Mitte sechzig'); valtersklasse:= altersklasse.caption; If radiobutton1.checked = true then vmann:=true else vmann:=false; vgewicht:= StrtoFloat (gewicht.Text); vgroesse:= StrtoFloat (groesse.text); vbmi:= vgewicht/(vgroesse*vgroesse); bmi.Caption:=FloattoStr(round(vbmi)); If vmann= true then begin If valtersklasse = 'Mitte dreißig' then begin If (vbmi <26) and (vbmi >19) then begin status.caption:= 'normalgewicht'; end else If vbmi <20 then begin status.caption:= 'untergewicht'; end else If vbmi >23 then begin status.caption:= 'übergewicht'; end; end; If vmann= true then begin If valtersklasse = 'Mitte zwanzig' then begin If (vbmi >17) and (vbmi <24) then begin status.caption:= 'normalgewicht'; end else If vbmi <18 then begin status.caption:= 'untergewicht'; end else If vbmi >23 then begin status.caption:= 'übergewicht'; end; If vmann= true then begin If valtersklasse = 'Mitte vierzig' then begin If (vbmi >20) and (vbmi <28) then begin status.caption:= 'normalgewicht'; end else If vbmi <21 then begin status.caption:= 'untergewicht'; end else If vbmi >27 then begin status.caption:= 'übergewicht'; end; end end end end end end; Wär cool wenn ihr helfen könnt ... (wenn der code nich optimal geschrieben is dann müsst ihr verständnis haben ... is mein zweites Programm Gruß Paddy procedure TForm1.schliessenClick(Sender: TObject); begin close; end; end. -
record objekt oder klassentyp erforderlich
Paddy92 antwortete auf Paddy92's Thema in Delphi/RPG+CL/Sonstige
okay ...vielen Dank Vanatic ! ich werd mir das zu Herzen nehmen. Gruß Paddy -
Hallo Leute... Ich glaub ich bin einfach zu blöd ... vielleicht könnt ihr mir ja trd. helfen. Ich hab noch ned viel programmiert und des is eins von meinen ersten Programmen, bei mir kommt bei diesem Quellcode immer die Fehlermeldung "record objekt oder klassentyp erforderlich" begin gewicht:= StrtoFloat (gewicht.Text); groesse:= StrtoFloat (groesse.text); bmi:= gewicht/(groesse*groesse); bmi.Caption:=FloattoStr(bmi); end; Danke schonmal für eure Hilfe. Gruß Paddy
-
Ey man ! des kling voll überarg ! :-D Ich hab grad erst angefangen mit meiner Ausbildung und kann mir voll ned vorstellen das ich sowas ma können soll :eek Aber deine Idee kling cool
-
Hey römer... also hab nur einen Benutzer. Und wenn ich die 30 sec warte dann geht das Kontextmenü auf und es geht ganz normal weiter. Also ich hab mir jetzt ne BATCH geschrieben die mir Ordner auf einem gewünschten Pfad mit dem gewünschten Namen erstellt ... mein Problem scheint leider ohne Neuinstallation des Betriebssystems nicht lösbar. Danke für deine Antwort! Gruß Paddy
-
okay hat sich erledigt ... hab was zusammengeschrieben für alle dies interessiert: @echo off SET /P name=Geben sie den Namen des PC's vom Gegenüber ein: :neu SET /P nachricht=Ihre Nachricht: net send %name% %nachricht% goto neu end Gruß Paddy
-
Hallo Leute, Ich hab ma ne Frage... Ist es möglich eine BAT Datei zu schreiben die den Windows Nachrichtendienst nutzt und bei der man die Nachricht und den Empfänger dann in das Feld der BAT Datei eintragen kann? Oder ist diese Überlegung total Abwegig? Wär cool wenn jemand ne Idee hat. MfG Paddy
-
Also ich habe alle roten Einträge deaktiviert ... hat aber leider nichts gebracht (danke trotzdem) ... hat jemand noch ne andere Idee?! Gruß Paddy
-
Hey ho .. Ich hab en Kumpel der hatte des selbe Problem. Wir haben dann um es zu beheben Knoppix runtergeladen und eine live cd gemacht ... dann Knoppix starten und die HDD einstecken ... Dateien sichern dann Formatieren. Danach sollte sie wieder normal funktionieren Gruß Paddy
-
Danke! werde dieses programm ma ausprobieren ...
-
Wieee en Button ?! wo soll der sein ... (Meinst du den rechts von der Ordnerübersicht wenn man einen Ordner offen hat ?!) mir gehts eher um die Aktion aufm Desktop... aber trd. danke ..