Hi Irwin,
do you check the Return-Value of the Show()-Method?
From the VO-Help:
StandardFontDialog:Show() Method
Purpose
Display a standard font dialog. To retrieve the value that the user selected, use the StandardFontDialog:Font access.
Syntax
<oStandardFontDialog>:Show() ---> LOGIC ...
Search found 98 matches
- Sun Dec 29, 2024 11:16 am
- Forum: Product
- Topic: Escaping the Font Selector window
- Replies: 11
- Views: 1180
- Sun Apr 28, 2024 7:44 pm
- Forum: Product
- Topic: easy calculation goes wrong
- Replies: 5
- Views: 1285
Re: easy calculation goes wrong
Horst,
ich verwende diese Einstellung und hatte noch nie ein Problem mit Rundungsfehlern:
SetFloatDelta (0.0001)
Um bei solchen Berechnung mit möglichst wenig Nachkommastellen zu arbeiten, würde ich erst die Multiplikation und dann die Division machen - damit die Werte der Variablen nicht so klein ...
ich verwende diese Einstellung und hatte noch nie ein Problem mit Rundungsfehlern:
SetFloatDelta (0.0001)
Um bei solchen Berechnung mit möglichst wenig Nachkommastellen zu arbeiten, würde ich erst die Multiplikation und dann die Division machen - damit die Werte der Variablen nicht so klein ...
- Fri Apr 05, 2024 8:42 am
- Forum: Deutsches Forum
- Topic: OleAutoObject
- Replies: 20
- Views: 3020
Re: OleAutoObject
Franz,
wenn für den Laufbalken oDlg:SetMarquee(TRUE, 1) eingeschalten wird, macht die Aktualisierung des Balkens durch
DIBSetProgressControl( oDlg:oDCProgressBar:Handle() )
doch eigentlich gar keinen Sinn.
Aus der Funktionsbeschreibung von DIBSetProgressControl():
//d With this function you can ...
wenn für den Laufbalken oDlg:SetMarquee(TRUE, 1) eingeschalten wird, macht die Aktualisierung des Balkens durch
DIBSetProgressControl( oDlg:oDCProgressBar:Handle() )
doch eigentlich gar keinen Sinn.
Aus der Funktionsbeschreibung von DIBSetProgressControl():
//d With this function you can ...
- Thu Apr 04, 2024 8:35 am
- Forum: Deutsches Forum
- Topic: FabPaint & FabSplitShell
- Replies: 6
- Views: 1072
Re: FabPaint & FabSplitShell
Hallo Franz,
...ist im Anhang.
Gerhard
...ist im Anhang.
Gerhard
- Thu Mar 14, 2024 6:01 pm
- Forum: Deutsches Forum
- Topic: Falsch sortiert
- Replies: 5
- Views: 1018
Re: Falsch sortiert
Horst,
in VO habe ich diesen Vermerk:
SetAnsi( TRUE ) // after SetNatDLL()!!
Evtl. funktioniert das auch in X#.
HTH
Gerhard
in VO habe ich diesen Vermerk:
SetAnsi( TRUE ) // after SetNatDLL()!!
Evtl. funktioniert das auch in X#.
HTH
Gerhard
- Tue Mar 05, 2024 1:19 pm
- Forum: VO & Vulcan
- Topic: Speed import csv data
- Replies: 7
- Views: 1797
Re: Speed import csv data
Jack,
IF 'Spectrum:,' $ Left(s_ln, 10)
why $ ??
IF Left(s_ln, 10) == 'Spectrum:,'
Please show your code of ParseCSVRecord().
You should create your array only once with:
a_res := ArrayCreate(5)
and fill it inside your function ParseCSVRecord():
ParseCSVRecord(a_res, s_ln, '"', ',')
No need to ...
IF 'Spectrum:,' $ Left(s_ln, 10)
why $ ??
IF Left(s_ln, 10) == 'Spectrum:,'
Please show your code of ParseCSVRecord().
You should create your array only once with:
a_res := ArrayCreate(5)
and fill it inside your function ParseCSVRecord():
ParseCSVRecord(a_res, s_ln, '"', ',')
No need to ...
- Sat Sep 23, 2023 10:34 am
- Forum: Forum Italiano
- Topic: problemi con Append()
- Replies: 20
- Views: 6809
Re: problemi con Append()
Hi Gian Ferruccio,
the file is locked after your :Append(). The following RLock() can not work after that :Append().
I would try this:
self:oTabReg:Append(TRUE)
and first a Commit() and then Unlock():
self:oTabReg:Commit()
self:oTabReg:Unlock()
That should work.
Best regards.
Gerhard
the file is locked after your :Append(). The following RLock() can not work after that :Append().
I would try this:
self:oTabReg:Append(TRUE)
and first a Commit() and then Unlock():
self:oTabReg:Commit()
self:oTabReg:Unlock()
That should work.
Best regards.
Gerhard
- Thu Jun 15, 2023 4:23 pm
- Forum: Forum Italiano
- Topic: Import/export Excel files - Funziona!!
- Replies: 55
- Views: 16817
Import/export Excel files
<r>Ciao Gian Ferruccio,<br/>
<br/>
have a look at that tool to work with Excel-files:<br/>
<URL url="http://www.libxl.com/">www.libxl.com/</URL><br/>
<br/>
Easy to use - very fast - no need of a office license for the user - no fight with office-files - works with xls- and xlsx-files - a lot of ...
<br/>
have a look at that tool to work with Excel-files:<br/>
<URL url="http://www.libxl.com/">www.libxl.com/</URL><br/>
<br/>
Easy to use - very fast - no need of a office license for the user - no fight with office-files - works with xls- and xlsx-files - a lot of ...
- Tue May 16, 2023 9:14 am
- Forum: VO & Vulcan
- Topic: bBrowser bColorCondition using a method?
- Replies: 4
- Views: 2489
bBrowser bColorCondition using a method?
<t>Dick,<br/>
<br/>
that should work:<br/>
<br/>
METHOD ....... CLASS MyWindowWithbBrowser<br/>
...<br/>
oColorCondition := bColorCondition{"Server:SomeMethod()", SELF, Color{COLORRED}}<br/>
oColumn:ColorCondition:Add(oColorCondition)<br/>
...<br/>
<br/>
<br/>
METHOD SomeMethod () AS LOGIC PASCAL ...
<br/>
that should work:<br/>
<br/>
METHOD ....... CLASS MyWindowWithbBrowser<br/>
...<br/>
oColorCondition := bColorCondition{"Server:SomeMethod()", SELF, Color{COLORRED}}<br/>
oColumn:ColorCondition:Add(oColorCondition)<br/>
...<br/>
<br/>
<br/>
METHOD SomeMethod () AS LOGIC PASCAL ...
- Tue Apr 18, 2023 7:45 am
- Forum: Welcome
- Topic: Validating textbox input as numeric
- Replies: 9
- Views: 3995
Validating textbox input as numeric
Roland,
why not set a picture to that textbox. Then there are only numbers possible.
I don't work with Harbour, but something like that should be possible:
SELF:tbTaxRate.Picture := "999.99"
HTH
Gerhard
why not set a picture to that textbox. Then there are only numbers possible.
I don't work with Harbour, but something like that should be possible:
SELF:tbTaxRate.Picture := "999.99"
HTH
Gerhard