Tag: delphi-7

Delphi 7, veröffentlicht im August 2002, ist eine version von Delphi für Windows 32-bit.

Zoom canvas-Bereich, in Delphi

Anzahl der Antworten 1 Antworten
Ich etwas, das aussieht wie die Farbe in Delphi. Ich fand, wie man zoom-Funktion: procedure SetCanvasZoomFactor(Canvas: TCanvas; AZoomFactor: Integer); var i: Integer; begin if AZoomFactor = 100 then SetMapMode(Canvas.Handle, MM_TEXT) else begin SetMapMode(Canvas.Handle, MM_ISOTROPIC); SetWindowExtEx(Canvas.Handle, AZoomFactor, AZoomFactor,

Wie, um Musik zu spielen, die in Delphi 7?

Anzahl der Antworten 2 Antworten
Ich brauche, um Musik zu spielen, die im hintergrund beim start des Programms in der OnFormActivate Ereignis für mein Programm. Ich habe das Lied, das ich verwenden möchte, aber ich weiß nicht welchen Befehl Delphi nutzen muss,

Gewusst wie: entfernen der Titelleiste aus einem Formular

Anzahl der Antworten 3 Antworten
Weiß jemand, wie man erstellen Sie ein Delphi-Formular ohne eine Titelleiste? Ich habe gesehen, einige links/Tipps, aber es ist nicht genau das, was ich will und ich könnte nicht es selbst tun. Dies ist, was ich versuche

Programmgesteuertes laden von CSV-Datei in Excel-Arbeitsblatt (Delphi 7)

Anzahl der Antworten 6 Antworten
Ich habe eine große Menge von Daten, zum einfügen in ein Arbeitsblatt einer vorhandenen Excel-Arbeitsmappe. Die Excel-Arbeitsmappe haben, die anderen Tabellenblätter mit Berechnungen und pivot-Tabellen. Die Daten können so viele wie bei 60.000 Zeilen und mehr als

Wie man eine Befehlszeile zu erstellen mit Delphi 7?

Anzahl der Antworten 3 Antworten
Ich versuche zu bauen, ein delphi-Projekt aus der command-line compiler Beispiel: C:\dcc32 -B C:\BD\Delphi7\work\MyProject.dpr Abgesehen von den standard-evironment Wegfindung: $(DELPHI)\Bin; $(DELPHI)\Lib; $(DELPHI)\Imports; $(DELPHI)\Projects\Bpl; $(DELPHI)\Rave5\Lib; es ist fast 50, andere Wege zu anderen Bibliotheken, Komponenten, usw... Wie kann

Farbe der stringgrid-Spalte je nach columnname text

Anzahl der Antworten 2 Antworten
Ich bin, dies zu tun : procedure TForm1.BitBtn1Click(Sender: TObject); var dtStart: TDateTime; I: Integer; begin dtStart := DateTimePicker1.Date; for I := 0 to 7 do AdvStringGrid1.Cells[I+1, 0] := uppercase(FormatDateTime('DD/MM/YYYY DDD', dtStart + I)); end; Gibt es eine

Umzug Von Delphi7 auf Delphi XE oder 2010 für Unicode?

Anzahl der Antworten 3 Antworten
ive ein news-server Gebaut, auf Delphi7, mit Indy9 TIdTCPServer und die Kunden sind mit TClientSocket aus ScktComp für die Größe, und der Verkehr ist verschlüsselt RC4 (string) was muss ich genau tun, um meine app funktioniert auf

Udp-Socket-handling

Anzahl der Antworten 2 Antworten
Möchte ich den UDP-Socket zu senden Sie einfach eine audio-stream. Mein problem ist, dass ich nicht bekommen kann es arbeiten, dachte ich, es wäre einfacher dann mit dem TCP-IP. Was ich Tat, ich ging einen UDPSocket-Komponente auf

Die Verbindung zu excel-2007-Datei mit ADOConnection in Delphi7

Anzahl der Antworten 1 Antworten
Ich möchte eine Verbindung zu einem excel 2007 - Datei(.xlsx) mit delphi 7, so habe ich ein AdoConnection und seine connectionstring Eigenschaft als: Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\test\qm\Results-summary.xlsx;Extended Properties="Excel 12.0;IMEX=1";Persist Security Info=False Aber wenn ich aktiv die AdoConnection bekomme ich

Wie man Datenbank-Werte in und aus dem code. in Delphi 7

Anzahl der Antworten 3 Antworten
HINTERGRUND Mache ich ein einfaches Programm, um log-Daten und ein paar Berechnungen mit ein .MDB-Datenbank. der Zugriff erfolgt über Jet 4. ZIEL Ich möchte in der Lage sein, um den Wert aus /in jedem Feld aus einer

Wie zum speichern von dynamischen arrays in eine TList?

Anzahl der Antworten 6 Antworten
Brauche ich, um zu speichern und eine unbekannte Zahl von Gruppen. Jede Gruppe hat eine unbekannte Anzahl Elemente/Elemente. Dies ist meine "Gruppe": TGroup= array of Integer; <------ dynamic array (as you can see) :) Möchte ich eine

Delphi XE3-EXE-Datei-Größe 25-mal größer als Dephi 7

Anzahl der Antworten 4 Antworten
Als test habe ich beschlossen, erstellen Sie eine einfache "Hallo Welt" - Programm in Delphi-mit Delphi 4, 5, 6, 7, 2005, 2010 und XE3. Die app ist nichts weiter als ein TForm, ein TButton mit einem OnClick-Ereignis

So ändern Sie die Farbe der tcxgrid Zeile

Anzahl der Antworten 3 Antworten
Möchte ich zeigen, einige Zeilen aus tcxgrid in verschiedenen Farben (Je nach Spalte Wert ). Habe ich verpasst, aber seine nicht immer spiegelt sich im raster, nach dem ausführen von meinem Projekt. procedure TfrmMessaging.cxGrid1DBTableView1CustomDrawCell(..); Var i :

Custom Control Creation in Delphi

Anzahl der Antworten 2 Antworten
ich verwendet, um diese auf ein Formular, und erstellen Sie es wie 10 mal, das war ok, bis ich versuchte, Sie zu passieren, diese Reihe, es begann das Essen von system-Ressourcen, gibt es trotzdem konnte ich eine

Machen Besitzer gezogen TPageControl Registerkarten schöner Aussehen, ohne die owner-draw -

Anzahl der Antworten 2 Antworten
Ich benutze Delphi7, PageControl mit den owner-draw. Ich kann nicht so flach und schön Aussehen von tabs, so wie ich das sehe auf nicht-Besitzer-gezeichnet PageControls. Was ist schlecht: bei der Verwendung von owner-draw, ich kann nicht zeichnen,

Was ist der Schnellste Weg der Strippen, nicht alphanumerische Zeichen aus einer Zeichenfolge in Delphi7?

Anzahl der Antworten 4 Antworten
Die zulässige Zeichen sind A bis Z, A bis z, 0 bis 9. Die geringste Menge an code oder eine einzelne Funktion das beste wäre, als das system mal kritisch die Reaktion auf Eingaben. Schön tagging 😉

Verwenden von string-Zeiger zum senden einer Zeichenkette über die windows-Nachrichten

Anzahl der Antworten 1 Antworten
ich versuche zu verstehen, wie Zeiger auf strings arbeiten. Ich habe einen code (nicht gerade originell), die geschrieben wurde von jemandem, und die person ist nicht hier mehr, also muss ich verstehen, die Idee, eine solche Nutzung.

Was ist Delphi äquivalent zu "+=" für das hinzufügen von Elementen für ein set?

Anzahl der Antworten 4 Antworten
In anderen Sprachen, wie C++, dort sind die Operatoren zu tun, einen plus-gleich-oder-oder-gleich-Typ-operation, um zusätzliche styles/flags. Gibt es ein äquivalent in Delphi? Nun habe ich einige code wie: label1.Font.Style := label1.Font.Style + [fsBold]; label2.Font.Style := label2.Font.Style +

delphi 7 http-Anfrage in string

Anzahl der Antworten 4 Antworten
Ich soll zum laden einer url direkt in einen string ohne jeden Datenstrom,was ist der beste Weg, internet open url funktioniert, aber es scheint nicht klar. Möchte ich nicht verwenden, jede Komponente für das Lesen, einige kurze

Delphi 7 auf Windows 8

Anzahl der Antworten 2 Antworten
Habe ich installiert Windows 8 auf meinem laptop, und versuchen, zu Delphi 7 zu laufen. Ich die AV-error: Zugriffsverletzung bei Adresse 40005A06 in Modul 'rtl70.bpl' Lesen von Adresse C08B0033 Ich habe versucht, alles, was ich denken kann,

Syntax-Hervorhebung-Beispiel?

Anzahl der Antworten 4 Antworten
gibt es einen einfachen code-Beispiel gibt, oder how-to, wie man ein richedit-Steuerelement tun syntax-Highlighting ? ich habe versucht, SynEdit aber es ist sehr sehr kompliziert für mich, ich Frage mich, ob es ein kleines code-snippet, dass ich

Drucker Drucken Größe

Anzahl der Antworten 4 Antworten
Wie kann ich die Druck-Größe (Breite und Höhe) von code, ohne dass ein dialog? Dank Machst du den Druck manuell (über Printer.BeginDoc etc.) oder sind Sie mit einem TRichEdit zum Beispiel? Was meinst du mit "Druck-Größe"? Druck-Größe

Wie zeichnet man eine lichtdurchlässige Bild auf ein Formular?

Anzahl der Antworten 3 Antworten
Möchte ich ein Unentschieden eine lichtdurchlässige Bild auf einer Delphi-form, aber aus irgendeinem Grund es nicht funktioniert. Hier ist die original-PNG (Grenze ist semi-transparent): Ich lade das Bild in ein TImage Objekt: Image1.Transparent := True; Form1.Color :=

Zum laden und speichern StringGrid Inhalt?

Anzahl der Antworten 3 Antworten
Erste Teil des Codes funktioniert, während die zweite (kommentierte) nicht. Es überschreibt mein A1 Datei obwohl es schreiben soll zu A2. procedure TForm1.AdvGlowButton12Click(Sender: TObject); var i,j: Integer; Seznam: TStrings; ApplicationPath: string; begin if (cxRadiogroup3.ItemIndex and cxRadiogroup2.ItemIndex) =

Wie teilen sich die Funktionen in Delphi?

Anzahl der Antworten 2 Antworten
Zum Beispiel, ich habe ein paar Funktionen geschrieben, die für meine form. Jetzt brauche ich die genau gleichen Funktionen, nur in einer anderen form. Also, wie kann ich teilen Sie Sie zwischen den beiden Formen? Bitte geben

TPNGObject - Erstellen Sie eine neue leere Bild und ziehen Sie durchscheinend Bilder drauf

Anzahl der Antworten 4 Antworten
Ich Baue eine Anwendung, die "virtuellen windows". Die Ausgabe ist TImage Objekt. 1) Die Anwendung lädt, Fenster-skin-Dateien in TPNGObject's: 2.) Dann Anwendung erstellen Sie eine neue leere TPNGObject, und die Größe des skin-Dateien zu den notwendigen Größen

Delphi7 SQL Server 2008 - Datentypen varchar und text sind nicht miteinander vereinbar größer-als-oder-gleich-operator

Anzahl der Antworten 3 Antworten
Bitte helfen, Habe ich immer diese Fehlermeldung, wenn ich Werte übergeben, um einen parameter mithilfe von code ähnlich: parameters.paramByName('ParamVal1').value := trim(TextBox1.Text); parameters.paramByName('ParamVal2').value := trim(TextBox2.Text); So, wenn eine der Textboxen leer ist, dann der Fehler: Den Datentypen varchar

Cannot perform this operation on a closed dataset

Anzahl der Antworten 2 Antworten
Ich versuche nur, um führen Sie die "select" sql-Anweisung mit TADOQuery-Komponente, aber wenn TADOQuery der "Open" - Anweisung ausgeführt wird, erhalte ich folgenden Fehler: Cannot perform this operation on a closed dataset... ADOQuery1.Active := False; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('Select

Gewinde Delphi ADO-Abfrage

Anzahl der Antworten 1 Antworten
Ich habe einen Abfrage-code, den ich anrufen kann jeder Zeit, die ich brauche zum abrufen von Daten aus der Datenbank, und ich möchte es eingefädelt werden. Nicht sicher, wie Sie diese umsetzen in einen thread, so kann

So erstellen Sie eine combobox mit zwei Spalten (eine versteckt) in Delphi 7?

Anzahl der Antworten 2 Antworten
Erstellen einer TComboBox mit zwei Spalten, die eine der Spalten ausgeblendet, so dass Sie halten können einen id-Wert zusammen mit der tatsächlichen Position in der it? Und dann, wie man, dass der id-Wert programmgesteuert? InformationsquelleAutor Mikhail |

JPEG-Daten-stream in TImage

Anzahl der Antworten 1 Antworten
Habe ich einige Bild-Dateien gespeichert in einer einzigen Datei (eine Art Archiv). Die Datei sieht wie folgt aus: Gut, es ist getrennt in zwei Segmente - header-und Daten-segment. Header (grün) enthält verschiedene Informationen, wie z.B. album-name, Standort,

Wie kann ich Sortieren einer TList in Delphi auf eine beliebige Eigenschaft der Objekte, die es enthält?

Anzahl der Antworten 2 Antworten
Habe ich eine TList. Es enthält eine Sammlung von Objekten des gleichen Typs. Diese Objekte stammen aus einem TPersistent und haben über 50 verschiedene Eigenschaften veröffentlicht. In meiner Anwendung kann der Benutzer die Ausgabe einer Suche nach

Wie Planen Sie einen task programmgesteuert

Anzahl der Antworten 2 Antworten
Wie kann ich einen task planen mit delphi 7 wie Google-updater? Ich bin nicht mit der registry, weil es wird erkannt von Kaspersky antivirus als falscher alarm. Alles, was ich in der registry wie ein start-up-Element wird

Delphi, Ordner löschen mit Inhalt

Anzahl der Antworten 5 Antworten
wenn ich Unterordner im Ordner - dieser code ist nicht Ordner löschen... gibt es da irgendwelche Fehler? procedure TForm.Remove(Dir: String); var Result: TSearchRec; Found: Boolean; begin Found := False; if FindFirst(Dir + '\*', faAnyFile, Result) = 0

Lesen von Daten mit TIdUDPServer

Anzahl der Antworten 1 Antworten
Möchte ich zum Lesen von Daten aus einem elektronischen Gerät, das Daten sendet mein PC über UDP. Ich programmiert habe einen UDP-server in Delphi. Eine Ausnahme tritt in der Klasse EIdSocketError (Fehler #10049). Hier ist mein code:

Delphi: Kopieren FileStream MemoryStream zu

Anzahl der Antworten 2 Antworten
Möchte ich kopiere einen Teil eines FileStream in ein MemoryStream. FileStream.Write(Pointer(MemoryStream)^, MemoryStream.Size); FileStream.Read(Pointer(MemoryStream)^, count); Ist das richtig? Es ist nicht für mich arbeiten. formatieren Sie Ihren code, wählen Sie es im editor und drücken Sie Strg-K. InformationsquelleAutor

Wie man eine Konsole-Anwendung warten, bis die "Enter" - Taste, aber automatisch weiter, nachdem die Zeit?

Anzahl der Antworten 3 Antworten
Erstellte ich eine Konsole-Anwendung in delphi 7, die zeigen soll Nachrichten nach dem drücken der enter-Taste: begin writeln ('Press ENTER to continue'); readln; writeln ('blablabla'); writeln ('blablabla'); end; Die Sache ist, dass die Benutzer können eine beliebige

Delphi-cross-compiler für linux

Anzahl der Antworten 4 Antworten
Ich Frage mich, ob es irgendwelche Borland cross-compiler, um meinen windows-code funktioniert unter linux ohne wine.Ich verwende winxp mit delphi 7. Ich habe mich immer gefragt, ob es möglich war code gleiche Werkzeug, das ich generell in

Delphi: OnTimer-Ereignis meiner eigenen Timer nie passiert

Anzahl der Antworten 3 Antworten
Brauche ich eine Timer in eine "nicht-form" Delphi-unit (es gibt noch eine Haupteinheit, die mit einer form), so dass ich dies tun: unit ... interface type TMyTimer = Class(TTimer) public procedure OnMyTimer(Sender: TObject); end; var MyTimer: TMyTimer;

Warum ist FindWindow() nicht 100% zuverlässig?

Anzahl der Antworten 2 Antworten
Ich bin mit diesem code für Delphi 7 zu erkennen ist, wenn Internet Explorer ausgeführt wird: function IERunning: Boolean; begin Result := FindWindow('IEFrame', NIL) > 0; end; Dies funktioniert auf 99% der Systeme, die mit dem IE

Wie schneiden Sie eine Zeichenfolge, um einige gewünschte Anzahl in delphi?

Anzahl der Antworten 3 Antworten
Ich habe eine Spalte in der Datenbank, die kann nur 40 Zeichen in einem string. Also, wenn die Länge der Zeichenfolge größer als 40 Zeichen sein gibt mir Fehler. Wie kann ich schneiden/trimmen der string bis 40

Gibt es eine Referenz für MaskEdit-Masken?

Anzahl der Antworten 1 Antworten
Ich versuche, um eine semi-komplexe Maskierung textbox in Delphi 7. Ich habe Probleme, dass ich nicht finden können jede Art von Referenz für das, was die einzelnen Zeichen in einer Maske bedeutet. Alle, die ich finden kann,

Fehlerbehebung Zugriffsverletzung bei Adresse. Lesen von Adresse 00000000

Anzahl der Antworten 1 Antworten
Selben version von Delphi 7 Code bereitgestellt wurde bei den Rechnern, die in unserer gesamten Organisation. Jedes mal, wenn Benutzer A greift auf Datensatz Z auf der computer-F1, wird die folgende Fehlermeldung angezeigt: Access violation at address

Die Erkennung von 'text' - Datei-Typ (ANSI vs. UTF-8)

Anzahl der Antworten 4 Antworten
Schrieb ich eine Anwendung (eine psychologische Tests-Prüfung) in Delphi (7), die erstellt eine standard-text-Datei - also die Datei ist vom Typ ANSI. Jemand portiert, die zum ausführen des Programms auf das Internet, wahrscheinlich mit Java, und der

Immer JSON-Daten von einer website mit Delphi

Anzahl der Antworten 2 Antworten
Gibt es diese website http://www.ingress.com/intel Auf die website zugreifen, müssen wir die Anmeldung mit Benutzername und Passwort. Einmal auf die zugegriffen wurde, die Website verwendet die JSON-Daten. Ich bin neu hier im JSON-Sache. Jeder kann ein Allgemeines

delphi bekommen-Ordner-Pfad

Anzahl der Antworten 4 Antworten
Ich m arbeiten mit Delphi 7 und ich möchte den Pfad meiner .. /All Users/Dokumente Verzeichnis. Ich kam über den folgenden code uses shlobj, ... function GetMyDocuments: string; var r: Bool; path: array[0..Max_Path] of Char; begin r

Machen Sie ein Label sichtbar/Nicht Sichtbar in Delphi

Anzahl der Antworten 3 Antworten
Ich würde gerne eine Taste zum ändern der Beschriftung zwischen sichtbar und nicht sichtbar, wenn auf Sie geklickt wird. Ich habe Versucht den folgenden code, aber es funktioniert nicht: Var: Hidden : Boolean; Begin If Hidden =

Wie erstellen Sie ein Formular programmgesteuert mit ein paar Komponenten in Delphi

Anzahl der Antworten 2 Antworten
Ich arbeite mit Delphi 7 und ich bin versucht, erstellen Sie ein Formular programmgesteuert. Hier ist meine form-Klasse stub: unit clsTStudentInfoForm; interface uses Forms; type TStudentInfoForm = class (TForm) end; implementation end. Ich habe auch eine Taste

Die Berechnung der Größe des Textes vor dem zeichnen auf eine Leinwand,

Anzahl der Antworten 1 Antworten
Ich bin mit Delphi 7. Ich bin mehr als vertraut mit der Verwendung einer Leinwand, Zeichnung und text auf eine Leinwand und auch mit TCanvas.TextHeight-etc. Das problem entsteht, wenn ich implementieren möchten Zeilenumbruch. Nicht nur brauche ich

in Delphi7, Wie kann ich abrufen Festplatte eindeutige Seriennummer?

Anzahl der Antworten 4 Antworten
Hi Ich will abrufen HDD einmalige (hardware -) Seriennummer. Ich nutze einige Funktionen, aber in Windows Seven oder Vista funktionieren Sie nicht mehr richtig, weil der admin-rechten. Ist es möglich, es abzurufen, ohne als Administrator ausführen? Möglicherweise